matlab 多个向量的余弦角_matlab 一个向量和矩阵中各行向量的夹角余弦值 比如A=（1,2,3,4,5）B={1,2,3,4,5;6,7,8,9,10;11,12,13,14,15;16,1...

优质解答

楼主试试下述代码：

%{

matlab 一个向量和矩阵中各行向量的夹角余弦值

比如A=(1,2,3,4,5)

B={1,2,3,4,5;

6,7,8,9,10;

11,12,13,14,15;

16,17,18,19,20}

分别求向量A与矩阵B中各行向量的夹角余弦值

并输出最大的夹角余弦值,及所对应的具体是哪一行向量

%}

function [CosXY MaxCos MaxCosAngle RCMaxCos MinCos MinCosAngle RCMinCos] = ucos(X,Y)

% ucos功能：

% (1) 计算矩阵 X 的各行向量与矩阵 Y 的各行向量之间的夹角余弦,存储在输出项 CosXY 中;

% (2) 计算最大夹角余弦值及其所对应的角度,分别存储在输出项 MaxCos 和 MaxCosAngle 中;

% (3) 输出最大余弦值所对应的 X 和 Y 所在的行,存储在 RCMaxCos 中;

% (4) 计算最小夹角余弦值及其所对应的角度,分别存储在输出项 MinCos 和 MinCosAngle 中;

% (5) 输出最小余弦值所对应的 X 和 Y 所在的行,存储在 RCMinCos 中;

[rx cx] = size(X);

[ry cy] = size(Y);

if cx~=cy

error('输入的矩阵类型不匹配,输入的矩阵X和Y必须列数相同')

end

CosXY = zeros(rx,ry);

for k = 1:rx

for l = 1:ry

CosXY(k,l) = sum(X(k,:).*Y(l,:))/norm(X(k,:))/norm(Y(l,:));

end

end

MaxCos = max(max(CosXY));

MaxCosAngle = acos(MaxCos);

[r c] = find(CosXY==MaxCos); % 找出最大余弦值所在的行r和列c;

RCMaxCos = [r c];

disp(['最大余弦值出现在X的第 ' num2str(r) ' 行与Y的第 ' num2str(c) ' 行.'])

MinCos = min(min(CosXY));

MinCosAngle = acos(MinCos);

[r c] = find(CosXY==MinCos); % 找出最小余弦值所在的行r和列c;

RCMinCos = [r c];

disp(['最小余弦值出现在X的第 ' num2str(r) ' 行与Y的第 ' num2str(c) ' 行.'])

执行你的数据：

>> A = [1,2,3,4,5];

>> B = [1,2,3,4,5;

6,7,8,9,10;

11,12,13,14,15;

16,17,18,19,20];

>> [CosXY MaxCos MaxCosAngle RCMaxCos MinCos MinCosAngle RCMinCos] = ucos(A,B);

最大余弦值出现在X的第 1 行与Y的第 1 行.

最小余弦值出现在X的第 1 行与Y的第 4 行.

CosXY = [ 1 0.964950504732767 0.945343100616969 0.935153458570522]

MaxCos = 1

MaxCosAngle = 0

RCMaxCos = [1 1]

MinCos = 0.935153458570522

MinCosAngle = 0.362104308112746

RCMinCos = [1 4]