R- S3类的通用打印功能

Question

我有一个S3类，我正在尝试找出如何为其设置打印功能。

这部分很好。

print.webglobe <- function(wg, ...){
  "it worked!"
}

但是，如果我在上面运行devtools::check()，我会收到以下不祥消息：

checking S3 generic/method consistency ... WARNING
print:
  function(x, ...)
print.webglobe:
  function(wg, ...)

我尝试添加其他代码：

print <- function(wg, ...){
  UseMethod("webglobe", wg)
}

但是，有了现在，print.webglobe()似乎从未访问过，而我的S3类只是某种列表。

我该如何正确设置？

Answer 1

将wg更改为x。方法的正式论证必须匹配通用的参数，因为基于名称的通用呼叫的参数与该方法传递。这就是为什么print()无法正常工作，因为wg被发送到wg而不是方法的第一个参数。