R：从具有不同数据结构的列表返回函数结果。 （使用lapply或sapply函数）

Question

我正在苦苦挣扎。

我有一个具有不同数据结构的列表，如下所示

mylist<-list(dat1=c(rep(5:9, times=2)), dat2=seq(50,120,by=6), dat3=data.frame(a=c(1:4),b=c(-1:2)))

我想做的是通过使用函数将功能应用于mylist的每个元素>

[lapply或sapply功能。像lapply(mylist, function(x) mean(x) )

但是这是我的问题。mylist中的dat3是数据帧，它具有两个变量，但是lapply和sapply之类的函数仅返回一个最大值和平均值。

输出我想得到的是

 $dat1             
    max    mean 
     9       7
 $dat2
    max   mean
     116    83
 $dat3
      a              b
    max mean     max mean 
     4   2.5      2   0.5
谢谢您的帮助。

我正在苦苦挣扎。我有一个具有不同数据结构的列表，如下所示mylist

Answer 1

您可以使用递归lapply（rapply）

Answer 2

也许是这样？