我对点-点-点参数的范围有疑问。考虑以下函数`foo =
foo <- function(x, ...){
require(classInt);
intvl = classIntervals(x, ...);
return(intvl);
}
该函数非常适合以下调用
x = runif(100, 0, 100);
y1 = foo(x, n = 5, style = 'quantile');
y2 = foo(x, style = 'equal');
但是当我尝试使用 style = 'fixed' 参数(它也需要一个fixedBreaks 参数)时,我得到
y3 = foo(x, style = 'fixed', fixedBreaks = seq(0, 100, 20))
eval(expr, envir, enclos) 中的错误:
...列表不包含 2 个元素
请注意,以下内容完美运行
y5 = classIntervals(x, style = 'fixed', fixedBreaks = seq(0, 100, 20))
我怀疑这与范围规则有关,但无法具体说明。对此的任何帮助将非常感激。
编辑。我拼凑出一个更简单的技巧,让它发挥作用。我认为这是一个 match.call 问题,因为 style = 'pretty' 也存在同样的问题。快速浏览一下代码就会发现,这是进行此类 match.calls 的两种样式,因此很可能这就是错误的根源。无论如何,这是我建议的黑客攻击
foo2 <- function(x, ...){
require(classInt);
y = list(...); y$var = x;
intvl = do.call('classIntervals', y);
}
y6 = foo2(x, style = 'fixed', fixedBreaks = seq(0, 100, 20))
我认为里奇对我的问题的回答揭示了为什么我之前的代码无法工作。但是,我还是不明白为什么会这样。