请问如何实现矩阵指定列按行随机打乱位置，感谢！

busahuang

如何实现矩阵指定列按行随机打乱位置，有一矩阵，如A=[1 2 3 4;8 4 5 6 ;8 9 3 0;5 7 6 9]，我想实现除A(:,1)不变，其余各列按行随机打乱元素位置。打乱后的矩阵有可能是A=[1 4 2 3;8 5 4 6 ;8 3 0 9;5 9 7 6]等。请教大神，非常感谢！

Zedd

A = [1 2 3 4;8 4 5 6 ;8 9 3 0;5 7 6 9];
[n,m] = size(A);
  o$ i/ F: {- i! L+ Z; r2 otemp = arrayfun(@(ii) A(ii,[randperm( size(A,2)-1 )+1]),[1:1:n],'UniformOutput',false);
B = [A(:,1),vertcat( temp{:} )];
* {4 A3 D, l% t. O/ c$ U( xdisp( B )