我有以下几点:
library(tidyverse)
set.seed(1234)
df <- tibble(
x1 = letters[1:2],
y1 = list(
tibble(
x2 = letters[3:4],
y2 = list(
tibble(
x3 = seq(1, 100, 1),
y3 = rnorm(100)
)
)
)
)
)
我需要访问包含 x3
和 y3
的tibble中的tibble,并为每个数据帧应用自定义函数 . 为简单起见,假设我需要将 base::mean()
应用于 y3
.
我的真实数据比这要大得多,所以我正在寻找一种干净有效的方法 . 有任何想法吗?
2 回答
你可以不用自己的方式吗?
不确定您希望最终的数据帧看起来如何,但这是另一个建议
您需要找到要应用函数的级别(我通过括号索引进行),然后应用该函数 . 我希望这可以转移到你需要做的事情上 .