Créer une matrice symétrique dans R

Question

Comment créer cette matrice dans R? En fait, par exemple, l'élément fisrt de la matrice A[1,1] est égale à la somme de la multiplication des x^2 et j, A[1,2] est equla à la somme des multiplication des x et y et j ...

  x = 1:3 
      y = c(2, 4, 6) 
      z = c(3, 7, 9) 
      j = c(5, 10, 15) 
     > A 
      [,1] [,2] [,3] 
     [1,] 180 360 560 
     [2,] 360 720 1120 
     [3,] 560 1120 1750 

Answer 1

Je pense:

R > mat = as.matrix(cbind(x, y,z)) 
R > mat 
    x y z 
[1,] 1 2 3 
[2,] 2 4 7 
[3,] 3 6 9 
R > t(mat)%*%diag(j)%*%mat 
    x y z 
x 180 360 560 
y 360 720 1120 
z 560 1120 1750