构建自定义打印功能，数字参数会导致错误

Question

我只是想限制输出的小数。但是digits论证给了我麻烦。

我的代码

#' @export
print.xts <- function(x) {
  print(x, digits = 5)

}

打印xts对象时出现错误

Error in print.xts(x, digits = 5) : unused argument (digits = 5) 

可能是什么问题？

Answer 1

print.xts包中已存在xts方法，请尝试重命名应该有效的函数。