r - 如何从 apply() 函数输出中获取行名？

Question

我正在学习 R 并对世界银行的一些数据有所了解。我在列的一部分中使用了 apply() 函数，并以这种方式对值应用了标准差:result <- apply(df[6:46],2,sd,na.rm=TRUE) .

结果是一个有两列没有标题的对象，一列是所有被选中的 tibble 列的名称，另一列是每列的标准差。当我在输出中使用 typeof() 命令时，结果是 'double' . R 文档说 apply() 的输出是向量、数组或列表。

我需要知道这一点，因为我想提取所有行名并使用命令 rownames(result)抛出输出 NULL .我该怎么做才能提取此对象的行名称？请帮忙。

已尝试 rownames(result)和 row.names(result但都没有用。

Answer 1

我们可以使用stack将矢量输出转换成dataframe。

temp <- stack(apply(df[6:46],2,sd,na.rm=TRUE))

现在，我们可以在 temp$values 中使用 temp$ind 和 sd 的值访问所有列名。

以mtcars为例，

temp <- stack(apply(mtcars, 2, sd, na.rm = TRUE))
temp

#      values  ind
#1    6.02695  mpg
#2    1.78592  cyl
#3  123.93869 disp
#4   68.56287   hp
#5    0.53468 drat
#6    0.97846   wt
#7    1.78694 qsec
#8    0.50402   vs
#9    0.49899   am
#10   0.73780 gear
#11   1.61520 carb

我们还可以将其与 sapply 和 lapply 一起使用

stack(sapply(mtcars,sd, na.rm = TRUE))
#and
stack(lapply(mtcars,sd, na.rm = TRUE))