R中矩阵和的计算
我在考虑这个问题。如何在R中计数R中矩阵和的计算,r,rstudio,R,Rstudio,我在考虑这个问题。如何在R中计数 A-平方矩阵,k-任何不带for的自然数?如果我正确解释了你的符号,可能在基R中类似于这样的东西 A <- matrix(c(1,2,3,4), nrow = 2) #example matrix k <- 10 B <- Reduce(`%*%`, (rep(list(A), k)), accumulate = TRUE) #list of A^(1:k) BB <- lapply
A-平方矩阵,k-任何不带for的自然数?如果我正确解释了你的符号,可能在基R中类似于这样的东西
A <- matrix(c(1,2,3,4), nrow = 2) #example matrix
k <- 10
B <- Reduce(`%*%`, (rep(list(A), k)), accumulate = TRUE) #list of A^(1:k)
BB <- lapply(1:k, function(k) B[[k]]/k) #list of A^(1:k)/k
Reduce(`+`, BB) #sum of series BB
[,1] [,2]
[1,] 603684.8 1319741
[2,] 879827.1 1923425
你的意思是矩阵的轨迹,这可以使用下面的链接,它使用sumdiagA来计算方阵A的轨迹。