Function &引用；“逐字逐句”；功能

这看起来可能是一个简单而基本的问题。 我已经研究r几个月了，似乎我找不到我想要的函数。我甚至不知道怎么查。。。。没有搜索字符串的想法

我知道有一个函数可以得到变量的定义，而不仅仅是它的内容。我解释我自己

> x <- c(4:6,5:9)
> x  # This will return the contents of x...  4,5,6,5,6,7,8,9.

> the.function.i.m.looking.for(x)  # would return:
> c(4:6,5:9)

>x x#这将返回x的内容。。。4,5,6,5,6,7,8,9.
>.function.i.m.looking.for（x）#将返回：
>c（4:6,5:9）

有人记得那个函数吗？ 谢谢。

dput（x）

让您接近：

R> dput(x)
c(4L, 5L, 6L, 5L, 6L, 7L, 8L, 9L)

或者，如果字符表示就足够了，那么

deparse（substitute（））

习惯用法就足够了：

foo <- function(x) {
    deparse(substitute(x))
}

不是这个

R> foo(x)
[1] "x"

---

如果要返回重新创建对象所需的语法，则

dput（）

是您的朋友：

x <- c(4:6,5:9)
dput(x)
c(4L, 5L, 6L, 5L, 6L, 7L, 8L, 9L)

---

x
dput
就是你想要的。从帮助页面：“将R对象的ASCII文本表示形式写入文件或连接，或使用ASCII文本表示形式重新创建对象。”

>x x2全部相等（x，x2）
[1] 真的
+1同时给出三个相同的答案！@fioghual不是一个幸运的互联网吗谢谢你的回答，是的，我感到很幸运+1同时给出三个相同的答案。@fioghual不是运气吗interneter@baptiste美好的我知道有办法获得输出，但记不起正确的咒语。
x <- c(4:6,5:9)
dput(x)
c(4L, 5L, 6L, 5L, 6L, 7L, 8L, 9L)

> x <- c(4:6,5:9)
dput(x)
c(4L, 5L, 6L, 5L, 6L, 7L, 8L, 9L)

> x2 <-  c(4L, 5L, 6L, 5L, 6L, 7L, 8L, 9L)
> all.equal(x, x2)
[1] TRUE