Aggregate mean in R

user_13506225 0
Viewed 131

I am trying to view the mean values of height, grouped by eye color of the characters, that have a number in their name. I tried it with aggregate but I can't figure out the solution

sw %>%
  filter(grepl('[0-9]',name))%>%
     aggregate(height~eye_color,mean)%>%
        setNames(c("Eye color","Mean"))
mean dataframe aggregate r
2 Answers

If we want to use base R (R 4.1.0)

sw |>
    subset(grepl('[0-9]', name)) |>
    {\(dat) aggregate(cbind(Mean = height) ~ eye_color, data = dat, mean)}()

-output

#  eye_color Mean
#1       red  131
#2 red, blue   96
#3    yellow  167

data

data(starwars)
sw <- starwars
user_37322710

A dplyr solution:

library(dplyr)

starwars %>%
  filter(grepl('[0-9]',name)) %>% 
  group_by(eye_color) %>% 
  summarise(mean = mean(height))

Output:

  eye_color  mean
* <chr>     <dbl>
1 black        NA
2 red         131
3 red, blue    96
4 yellow      167
user_133216470
Related