「解釋可讀的」打印（R）

Question

我想知道是否有一個「翻譯可讀」的方式來打印對象的一種方式，它會做一些看起來像這樣：

> x <- c(1:5,8) 
> print.ir(x) 
c(1,2,3,4,5,8) 
> x <- matrix(1:4, ncol=2) 
> print.ir(x) 
matrix(c(1,2,3,4), ncol=2, nrow=2) 

這樣的結果可以複製到R腳本或另一個R會話中。

Answer 1

使用dput()這個：

x <- c(1:5,8) 
dput(x) 
c(1, 2, 3, 4, 5, 8) 

x <- matrix(1:4, ncol=2) 
dput(x) 
structure(1:4, .Dim = c(2L, 2L)) 

試試：

z <- structure(1:4, .Dim = c(2L, 2L)) 
z 
    [,1] [,2] 
[1,] 1 3 
[2,] 2 4