R语言编程艺术中，在Rstudio中建立一个10*10的矩阵，要如何提取对角线数
R语言编程艺术中，在Rstudio中建立一个10*10的矩阵，要如何提取对角线数字（不能单个提取，用函数）
x1 <- matrix(rnorm(100),10);
x2 <- sapply(1:10,function(x)return(x1[x,x]))
x2 <- sapply(1:10,function(x)return(x1[x,x]))
温馨提示：答案为网友推荐，仅供参考
相似回答