 cppFunction("arma::mat GramMat(arma::mat A, double parametro, int n) {             arma::mat resultado=A;             double temp;             for (int i=0; i<n; i++){               for (int j=i; j<n; j++){                   resultado(j,i)= 