有没有办法使用 R 打印对象的代码而不是它的值？
Is there a way to print the code of an object instead of its value using R?
例如，如果我有以下对象：
fz <- (1 / sqrt(2 * pi)) * exp(-(Z^2) / 2)
如果我已经分配了Z，我在输入"fz"
时得到一个返回值
> Z <- 0.03057164
> fz
[1] 0.3987559
但是，我想要一种快速的方法来打印 fz 的底层代码，以便我键入的代码结果为：
(1 / sqrt(2 * pi)) * exp(-(Z^2) / 2)
有什么快速的方法吗？
正如@mtoto 所暗示的那样，
fz <- function(Z) (1 / sqrt(2 * pi)) * exp(-(Z^2) / 2)
然后输入fz，你会得到
function(Z) (1 / sqrt(2 * pi)) * exp(-(Z^2) / 2)
例如，如果我有以下对象：
fz <- (1 / sqrt(2 * pi)) * exp(-(Z^2) / 2)
如果我已经分配了Z，我在输入"fz"
时得到一个返回值> Z <- 0.03057164
> fz
[1] 0.3987559
但是，我想要一种快速的方法来打印 fz 的底层代码，以便我键入的代码结果为：
(1 / sqrt(2 * pi)) * exp(-(Z^2) / 2)
有什么快速的方法吗？
正如@mtoto 所暗示的那样，
fz <- function(Z) (1 / sqrt(2 * pi)) * exp(-(Z^2) / 2)
然后输入fz，你会得到
function(Z) (1 / sqrt(2 * pi)) * exp(-(Z^2) / 2)