サボタージュ禁止のおさぼり日記

前回と同様に適当にはっつけるので, 気になったらコピペしてみて結果を確認してみてください. おまじない library (Rcpp) library (inline) library (RcppArmadillo) library (Matrix) # for sp_mat 行列積 # ベクトル, 行列の掛け算 src <- 'arma::rowvec a = arma::randu(1, 5); arma::colvec b = arma::randu(5, 1); ar…