1
我有一个列表中有很多对象(数据框,R6对象等等),我只想列出一些要打印的列表元素,当print
方法在列表上被调用。这是实现这一目标的最佳方式?默认情况下列表元素的任意打印
我有一个列表中有很多对象(数据框,R6对象等等),我只想列出一些要打印的列表元素,当print
方法在列表上被调用。这是实现这一目标的最佳方式?默认情况下列表元素的任意打印
您可以自定义class
添加到您的对象,并创建该类的打印方法:
x <- list(A=rnorm(5),B=sample(letters,100,replace=TRUE),C=mtcars)
class(x) <- c("myclass",class(x))
print.myclass <- function(x) {
print(list(A=prettyNum(x$A,digits=2), B=table(x$B)))
}
x
$A
[1] "-0.86" "-0.6" "0.76" "-0.2" "-0.92"
$B
a b c d e f g i j k l m n o p q r s t u v w x y z
4 3 3 11 3 6 2 3 6 5 3 3 5 3 1 1 7 4 2 3 5 5 2 7 3