использование purrr :: pmap в каждой строке кадра данных, где столбцы могут отличаться - PullRequest
0 голосов
/ 30 сентября 2019
  df <- tibble::tribble(  ~sev_curve, ~curve_type,  ~trend_date, ~weight,
                          "MILO",  'HOSPITALS',   '7/1/2020',      0.4,
                          'ALSO',  'PHYSICIANSC', '7/1/2020',      0.6)

df %>% mutate(c=purrr::pmap(df, function(#how to reference columns?) {...}))

Поэтому мне нужно использовать purrr :: map, чтобы применить функцию к каждой строке указанного выше фрейма данных. Тем не менее, только столбцы sev_curve и weight должны быть там. Другие 2 столбца могут присутствовать или отсутствовать, и могут быть другие столбцы, которые могут занять их место и т. Д.

1 Ответ

0 голосов
/ 30 сентября 2019

Мы можем использовать select и удалять столбцы стандартным способом с помощью - или one_of

library(dplyr)
library(purrr)
df %>%
     mutate(new = pmap_int(select(., -sev_curve, -weight), ~ n_distinct(c(...))))
...