r - 如何让 'summary' 与 R 中的自定义类一起使用

Question

我想知道如何获得 summary(object)使用我正在创建的包中的自定义类。例如，如果您运行以下命令:

testfunction <- function(x) {
  x.squared <- x^2
  x.double <- 2*x
  x.triple <- 3*x

  result <- list(squared = x.squared, double = x.double, triple = x.triple)
  class(result) <- "customclass"
  result
}

x <- rnorm(100)
output <- testfunction(x)
summary(output)

你会看到输出是非常无用的。但是，我似乎无法找到如何控制此输出。如果有人能指导我做某事，我将不胜感激。

(当然，我可以制作自定义汇总函数，例如 summary.Custom(object) ，但我更喜欢让常规的 summary 方法直接工作。

Answer 1

编写一个名为 summary.customclass 的函数使用与 summary 相同的参数(参见 args(summary))。

你在那里做的是创建一个 summary 的方法对于 S3 类。您可能想阅读 S3 类(class)。