pivot_longer summarize_each 的输出，均值和 sd 函数

Question

我正在尝试汇总我的数据集中的所有列（它有很多列，尽管下面的代表示例只有 2 列），获取每个变量的均值和标准偏差。我希望输出为长格式。

#Example dataset
d <- iris %>% select(Sepal.Length,Sepal.Width)
names(d) <- c("SepalLength","SepalWidth")

#Summarizing and trying to make it long
s <- d %>% summarize_each( list(mean=mean,sd=sd) )  # has summar stats, but they are in wide format

# trying to pivot.
s %>% pivot_longer( ??? what do I put here ???)

我尝试了一些变体（例如：pivot_longer(names_to = "key", values_to = "value")）但总是收到错误消息。

Answer 1

我们可以在

里面使用select_helpers

library(dplyr)
library(tidyr)
s %>%
   pivot_longer(everything())
# A tibble: 4 x 2
#  name             value
#  <chr>            <dbl>
#1 SepalLength_mean 5.84 
#2 SepalWidth_mean  3.06 
#3 SepalLength_sd   0.828
#4 SepalWidth_sd    0.436

或者如果我们需要 'SepalLength'、'SepalWidth' 作为两列

s %>% 
   pivot_longer(cols = everything(), 
       names_to = c(".value", "statistic"), names_sep="_")
# A tibble: 2 x 3
#  statistic SepalLength SepalWidth
#  <chr>           <dbl>      <dbl>
#1 mean            5.84       3.06 
#2 sd              0.828      0.436

或者如果我们需要 'mean'、'sd' 作为两列

s %>%
    pivot_longer(cols = everything(), 
       names_to = c("colNames", ".value"), names_sep="_")
# A tibble: 2 x 3
#  colNames     mean    sd
#  <chr>       <dbl> <dbl>
#1 SepalLength  5.84 0.828
#2 SepalWidth   3.06 0.436

或使用gather

s %>%
  gather

pivot_longer summarize_each 的输出，均值和 sd 函数

pivot_longer the ouput of summarize_each with mean and sd functions

r

dplyr

pivot

reshape2