R代码：n个矩阵相乘

R函数实现n个方阵相乘

终极解法

fun <- function(x,n){
expr = paste(rep('mat',n),collapse = '%*%')
result = eval(parse(text=expr))
return(result)
}
===============

递归实现

f <- function(x,n){
if(n == 1){
return(x)
}
return(f(x,n-1) %*% x)
}

最后编辑于 ：
©著作权归作者所有,转载或内容合作请联系作者
平台声明：文章内容（如有图片或视频亦包括在内）由作者上传并发布，文章内容仅代表作者本人观点，简书系信息发布平台，仅提供信息存储服务。

推荐阅读更多精彩内容