Request for Mike: proportion of long term survivors

[dchiu911]

I wonder if you could address a question for a revision on the MOCOG long term survivors paper. Brad Nelson is needing to know the number and proportion of cases in our PrOTYPE paper that had OS > 10yrs – preferably by subtype. I would presume these to be enriched in the better outcome subtypes C2/C4?

Best effort appreciated to address as they are seeking an answer for their response to reviewers.

protype_os_yrs_10 <- d %>% 
  select(ottaID, matches("os_(yrs|sts)"), final) %>% 
  mutate(long_term = fct_explicit_na(ifelse(os_yrs > 10, ">10 yrs", "<=10 yrs"))) %>% 
  count(final, long_term) %>% 
  group_by(final) %>% 
  mutate(prop = scales::percent(prop.table(n)),
         val = paste0(n, " (", prop, ")")) %>% 
  add_count(wt = n, name = "total") %>% 
  select(-c(n, prop)) %>% 
  ungroup() %>% 
  pivot_wider(names_from = "long_term", values_from = "val") %>% 
  relocate(total, .after = 5)