ag804.m

来自「线性代数实验及MATLAB入门,电子工业出版社出版 陈怀琛 龚杰民合著」· M 代码 · 共 15 行

%《线性代数实验践及MATLAB入门》第八章例题程序ag804
% 基向量及其夹角的计算
% 电子工业出版社出版  陈怀琛 龚杰民合著 2005年10月
%
v1=[7;-4;-2;9], v2=[-4;5;-1;-7]; % 输入参数
v3=[9;4;4;-7], w=[-9;7;1;-4], 
v=[v1,v2,v3]					 % 将三个基向量组成矩阵
c=v\w						% 求三个基向量线性组合的系数
v10=v1/norm(v1), 
v20=v2/norm(v2), 
v30=v3/norm(v1),
theta12=acos((v1'*v2)/(norm(v1)*norm(v2)))
theta13=acos((v1'*v3)/(norm(v1)*norm(v3)))
theta23=acos((v3'*v2)/(norm(v3)*norm(v2)))