Hi, Mr. Rick. Thank you very much for an immediate answer. proc iml;
x = { 1, 0};/* 2x1 column vector */
y = { 0.5, 0.866};/* 2x1 column vector */
inner = x` * y; /* ベクトルの内積 */
print inner; The returned scalar value 0.5 is corresponding to cosine 60 degree ! (x・y=|x||y|cosθ:θ=60) However, I'm sorry, the outer product(vector product) is different that I demand. proc iml;
x = { 1, 2, 3};/* 3x1 column vector */
y = { 3, 2, 1};/* 3x1 column vector */
outer = x * y`; /* ベクトルの外積 */
print outer; But, the answer that I demand, outer={2*1 - 2*3 , 3*3 - 1*1 , 1*2 - 3*2} ={-4,8,-4}. /* 3x1 column vector */ Best regards.
... View more