Question

假设我在没有产生这种矩阵的R代码的论文或教程中找到了这样的几个矩阵。假设我想使用R重新生成（甚至在不同的函数中使用它们）这些矩阵。那么，有一种简单的方法可以将矩阵的输出转换为R代码。那就是如果我有以下矩阵，我如何将其转换为R代码。

> Matrix
     [,1] [,2] [,3] [,4] [,5]
[1,]    5    0    0    0    0
[2,]    2    2    0    0    0
[3,]    3    3    3    0    0
[4,]    1    4    4    4    0
[5,]    4    1    1    1    1

Answer 1

我不确定你的目标是什么，但是如果你想复制/粘贴矩阵输出（例如从教程中）并将其转换为矩阵对象，你可以做类似的事情

mat_string <- "     [,1] [,2] [,3] [,4] [,5]
[1,]    5    0    0    0    0
[2,]    2    2    0    0    0
[3,]    3    3    3    0    0
[4,]    1    4    4    4    0
[5,]    4    1    1    1    1"

mat_list <- strsplit(strsplit(string,"\n")[[1]][-1],"    ")
mat <- do.call("rbind",mat_list)[,-1]
class(mat) <- "numeric"

mat
     [,1] [,2] [,3] [,4] [,5]
[1,]    5    0    0    0    0
[2,]    2    2    0    0    0
[3,]    3    3    3    0    0
[4,]    1    4    4    4    0
[5,]    4    1    1    1    1

将矩阵输出转换为R代码

1 个答案: