基于“情节”理解do.call语义

Question

我在玩 do.call。

I = iris
do.call(what = "plot", args = c(I$Sepal.Length ~ I$Sepal.Width))
# This seems fine

p = list(x = I$Sepal.Length, y = I$Sepal.Width)
do.call(what = "plot", args = p)
# This looks weird

p1 = list(x = I$Sepal.Length, y = I$Sepal.Width, xlab = "")
do.call(what = "plot", args = p1)
# A bit less weird


p2 = list(x = I$Sepal.Length, y = I$Sepal.Width, xlab = "", ylab = "")
do.call(what = "plot", args = p2)
# And this gives the same as the first do.call

那么，为什么我必须提供轴标签来隐藏使用do.call 时得到的所有数字？

Answer 1

首先您需要了解plot 是一个S3 generic，它根据第一个参数调用方法。如果您执行plot(y ~ x)，则此方法为plot.formula，并且从公式中推断出轴标签。如果你做plot(x, y)（注意x和y的顺序不同），方法是plot.default，轴标签是从作为参数传递的符号中推断出来的。

现在，如果您使用a <- 1:2; y <- 3:4; plot(x = a, y = b)，则标签为a 和b。然而，如果你使用do.call 魔法，do.call(plot, list(x = a, y = b) 会扩展为plot(x = 1:2, y = 3:4)，因此标签是1:2 和3:4。我建议使用带有 data 参数的公式方法，即，对于您的示例：

do.call(what = "plot", args = list(formula = Sepal.Length ~ Sepal.Width,
                                   data = I))

Answer 2

您所看到的是 R 在无法从参数中获取任何其他命名信息时放在轴标签上的内容。如果你这样做：

plot(x=c(1,2,3,4,5,6,7,8),y=c(1,2,3,4,3,2,3,4))

那么绘图将不得不使用向量值作为轴标签。

当使用do.call 时，列表参数中的名称与被调用函数的参数名称相匹配。所以轴标签没有名字，只有值。到那时，数据来自I$Sepal.width 的事实早已不复存在，它只是一个值向量。