r函数：将所有参数打印为字符串。

Question

我正在尝试将所有参数组合成一个字符串。我目前有以下功能，当我仅传递文本时，该功能可以正常工作。但是当我在参数中包含另一个R函数时，它就会崩溃。

p

理想情况下，我希望它打印     “ hello = sum（x），世界，”

还有，有没有办法将其扩展到无数个参数？

谢谢。

Answer 1

在一般情况下，也许这样的事情对您有用

f <- function(...) {
  xx<-lapply(sys.call()[-1], deparse)
  paste0(ifelse(nchar(names(xx))>0, paste0(names(xx),"="), ""), unlist(xx), collapse=", ")
}
f(hello=sum(x), world)
# [1] "hello=sum(x), world"