将对象转换为代码的R函数

Question

我正在寻找R语言中的一种函数，可以将一个对象转换为可用于创建该对象副本的代码。类似于以下内容：

> myObject=c(1, 2, 3)
> magicFunction(myObject)
[1] "c(1,2,3)"

我认为这个函数存在，但我找不到它。非常感谢您的帮助。

- k-zar

Answer 1

您也可以使用dput，因为它保留了对象的结构，而不是其字符字符串表示。

来自?dput：

将R对象的ASCII文本表示写入文件或连接，或使用它来重新创建对象。

例如

myObject=c(1, 2, 3)

dput(myObject)
# c(1, 2, 3)


identical(myObject, dput(myObject))
# c(1, 2, 3)
# [1] TRUE

## whereas
identical(myObject, deparse(myObject))
# [1] FALSE

- SymbolixAU

Answer 2

我们可以使用deparse。

deparse(myObject)
#[1] "c(1, 2, 3)"

- akrun