如何使用 r 计算我的 x 分类变量（暴露）的前 84 行 select 来计算我的连续 y 变量的平均值？

Question

我尝试使用平均 function 以及摘要。 我也尝试过 tapply 并尝试了 select 行，但它计算了整体平均值。

Answer 1

像这样的东西？

library(tidyverse)

data <- tibble(
  x = factor(c("A", "B", "C")) %>% sample(100, replace = TRUE),
  y = rnorm(100)
)

data
#> # A tibble: 100 x 2
#>    x          y
#>    <fct>  <dbl>
#>  1 B     -0.271
#>  2 C     -0.361
#>  3 C      1.17 
#>  4 A     -0.652
#>  5 A      0.770
#>  6 C     -0.605
#>  7 B      0.976
#>  8 B      0.392
#>  9 B      1.08 
#> 10 A      0.548
#> # ... with 90 more rows

head_means <- 
  head(data, 84) %>% 
  group_by(x) %>% 
  summarize_at("y", mean) %>% 
  ungroup()

head_means
#> # A tibble: 3 x 2
#>   x          y
#>   <fct>  <dbl>
#> 1 A      0.132
#> 2 B      0.385
#> 3 C     -0.110

^{由代表 package (v0.3.0) 于 2019 年 10 月 19 日创建}

随意将此或其变体合并到您的问题中。