Início / coding / Perguntas / 79072198
Accepted
Andrea
Asked: 2024-10-10 06:06:21 +0800 CST

Como remodelar um dataframe em formato amplo com pares de colunas especificados

  • 772

Tenho o seguinte dataframe de amostra derretido:

df_melted <- data.frame(ID = c(21, 21, 21, 21, 49, 49, 49, 49), instance = c(1, 1, 1, 1, 1, 1, 2, 2), variable = c("causeofdeath", "deathdate", "dob", "gender", "causeofdeath", "deathdate", "deathdate", "causeofdeath"), value_temp = c("BLANK", "MM/DD/YYYY", "BLANK", "F", "BLANK", "BLANK", "MM/DD/YYYY", "BLANK"))

df_derretido

E o seguinte arquivo de mapeamento que desejo usar eventualmente para produzir novos valores usando um left_join():

df_map <- data.frame(var_name_1 = c("causeofdeath", "causeofdeath", "dob"), val_1 = c("BLANK", "BLANK", "MM/DD/YYYY"), var_name_2 = c("deathdate", "deathdate", "gender"), val_2 = c("MM/DD/YYYY", "BLANK", "F"), new_var_name = c("ida", "idf", "ids"), new_val = c("T60", "T55", "T67"))

df_mapa

Como posso remodelar df_melted para que fique no mesmo arranjo específico mostrado em df_map sem fazer nenhuma suposição sobre a ordem do dataframe?, ou seja:

df_procurado

Eu tentei usar pivot_wider() sem sucesso

1 respostas

  1. Best Answer

    Você pode tentar pivot_widerdepois de adicionar algumas colunas auxiliares, por exemplo, pegrp

    df_melted %>%
    mutate(p = rep(1:2, length.out = n()), grp = ceiling(row_number() / 2)) %>%
    pivot_wider(
        names_from = p,
        values_from = c(variable, value_temp),
        id_cols = c(ID, instance, grp),
        names_vary = "slowest"
    ) %>%
    select(-grp)

    e você obterá

    # A tibble: 4 × 6
     ID instance variable_1   value_temp_1 variable_2   value_temp_2
  <dbl>    <dbl> <chr>        <chr>        <chr>        <chr>
1    21        1 causeofdeath BLANK        deathdate    MM/DD/YYYY
2    21        1 dob          BLANK        gender       F
3    49        1 causeofdeath BLANK        deathdate    BLANK
4    49        2 deathdate    MM/DD/YYYY   causeofdeath BLANK
    • 2

relate perguntas