MATLAB实现搬运的排序 【例】

带有搬运的排序。对数组arr1 进行升序排序，与arr1 中相对应的arr2 中的元素也

要发生改变。对这个种排序，每次arr1 中的一个元素与另一个元素进行交换，arr2 中对应的

元素也要进行相应的交换。当排序结束时arr1 中的元素按升序排列，arr2 中的元素也会有相

应的变化。

当arr1 的数组排序结束后，arr2 也要进行相应的变化。两数组为

编写一个程序，对第一个实数组进行按降序排列，对第二个数组进行相应交化。用下面

两个数组检测你的程序

a = [-1, 11, -6, 17, -23, 0, 5, 1, -1];

b = [-31, 102, 36, -17, 0, 10, -8, -1, -1];

1.ssort00.m

function [out1,out2] = ssort00(a,b)

%SSORT Selection sort data in ascending order

% Function SSORT sorts a numeric data set into

% ascending order. Note that the selection sort

% is relatively inefficient. DO NOT USE THIS

% FUNCTION FOR LARGE DATA SETS. Use MATLAB\'s

% "sort" function instead.

% Define variables:

% a --Input array to sort

% ii --Index variable

% iptr --Pointer to min value

% jj --Index variable

% nvals --Number of values in "a"

% out --Sorted output array

% temp --Temp variable for swapping

% Record of revisions:

% Date Programmer Description of change

% ==== ========== =====================

% 12/19/98 S. J. Chapman Original code

% Get the length of the array to sort

nvals = size(a,2);

% Sort the input array

for ii = 1:nvals-1

% Find the minimum value in a(ii) through a(n)

iptr = ii;

for jj = ii+1:nvals

if a(jj) < a(iptr)

iptr = jj;

end

end

% iptr now points to the minimum value, so swap a(iptr)

% with a(ii) if ii ~= iptr.

if ii ~= iptr

temp1 = a(ii);

temp2=b(ii);

a(ii) = a(iptr);

b(ii)=b(iptr);

a(iptr) = temp1;

b(iptr)=temp2;

end

end

% Pass data back to caller

out1 = a;

out2 = b;

2.test.m

clc

clear all

nvals = input(\'Enter number of values to sort: \');

% Preallocate array

array1 = zeros(1,nvals);

array2 = zeros(1,nvals);

% Get input values

for i = 1:nvals

%Prompt for next value

string1 = [\'Enter a value \' int2str(i) \': \'];

array1(i)=input(string1);

end

for ii = 1:nvals

%Prompt for next value

string2 = [\'Enter b value \' int2str(ii) \': \'];

array2(ii)=input(string2);

end

% Now sort the data

[out1,out2]=ssort00(array1,array2);

% Display the sorted result.

fprintf(\'\nBefore sorted data:\n\');

for iii = 1:nvals

fprintf(\'%d \',array1(iii));

end

fprintf(\'\n\');

for iiii = 1:nvals

fprintf(\'%d \',array2(iiii));

end

fprintf(\'\nAfter sorted data:\n\');

for iii = 1:nvals

fprintf(\'%d \',out1(iii));

end

fprintf(\'\n\');

for iiii = 1:nvals

fprintf(\'%d \',out2(iiii));

end

fprintf(\'\n\');