列出对象的方法

Question

使用此代码我将摘要扩展为仅从摘要返回系数：

x = c(1,2,3)
y = c(1,2,3)

m = lm(y ~ x)

tosum2 <- summary(m)
summary.myclass <- function(x)
{
  return(x$coef)
}
class(tosum2) <- c('myclass', 'summary')
summary(tosum2)

返回：

  Estimate Std. Error t value Pr(>|t|)
(Intercept)        0          0     NaN      NaN
x                  1          0     Inf        0

我想访问的摘要中有哪些方法，例如Residuals，但是如何发现这些方法名称？ 换句话说，如何扩展summary.myclass以返回其他数据，例如现有摘要中的残差？