Is there an R function to count strings by re-arranging the table

Asked Aug 29 '20 at 14:03

Active Aug 29 '20 at 14:03

Viewed 16 times

I have a dataframe similar to the one below:

study_name = c("ESF", "ESF", "ESF","AAB" )
results= c("alive", "alive", "dead", "dead")

df1 = data_frame(study_name,results, place)

I was trying to use tidyverse and groupby the study_name and then count alive and dead but it didn't work. This is what I tried to do:

df1 <- m_df %>% 
  group_by(study_name) %>% 
  summarise(n_alive=n_distinct("alive"),
            n_dead=n_distinct("dead"))

This is how I wanted the re-arrangement and count to be as in df2

alive= c(2, 0)
study_name = c("ESF","AAB" )
dead= c(1, 1)

df2 =data_frame(study_name, alive, dead)

asked Aug 29 '20 at 14:03

Sam

*Error in eval_tidy(xs[[j]], mask) : object 'place' not found*. – Rui Barradas Aug 29 '20 at 14:06
1

Is `table(df1[1:2])` what you want? – Rui Barradas Aug 29 '20 at 14:07
1

Or `df1 %>% group_by(study_name) %>% summarise(alive = sum(results == 'alive'), dead = sum(results == 'dead'))` in `dplyr` but surely there's a dupe for that – arg0naut91 Aug 29 '20 at 14:08
Or `df1 %>% count(study_name, results) %>% pivot_wider(names_from = results, values_from = n, values_fill = 0)` – Ronak Shah Aug 29 '20 at 14:09
Or `df1 %>% select(study_name, results) %>% table %>% as.tibble`. – Rui Barradas Aug 29 '20 at 14:09
Thank you a lot. `df1 %>% group_by(study_name) %>% summarise(alive = sum(results == 'alive'), dead = sum(results == 'dead'))` worked very well. Thanks again – Sam Aug 29 '20 at 15:58

0 Answers0