Início / coding / Perguntas / 77138219
Accepted
JVGen
Asked: 2023-09-20 06:11:41 +0800 CST

R: reúna vários conjuntos de colunas com tidyr pivot_longer()

  • 772

Estou tentando reunir dois conjuntos de colunas. Cada conjunto precisa terminar em uma nova coluna, mas os dados das linhas estão vinculados, portanto, o uso sequencial de tidyr::gather()não garantirá a retenção da organização entre colunas. Parece que tidyr::pivot_longer()posso conseguir isso, mas estou perplexo. Uma postagem semelhante está aqui , mas a resposta envolve o uso do grep para renomear colunas, o que não consigo desvendar e também não deveria ser necessário aqui.

library(tidyverse)

df <- data.frame(
  Position=1:5,
  A_Width=3:7,
  B_Width=4:8,
  A_Error=seq(0, 2.0, 0.5),
  B_Error=seq(0.3, 1.5, 0.3)
  )


df <- df %>%
  tidyr::pivot_longer(
    cols=c(A_Width, B_Width, A_Error, B_Error),
    names_to= ? ,
    names_pattern= ? ,
    )

##Desired Data Frame
df_long <- data.frame(
  Position=rep(1:5,2),
  Group=c(rep("A",5), rep("B",5)),
  Width=c(3:7,4:8),
  Error=c(seq(0, 2.0, 0.5), seq(0.3, 1.5, 0.3))
  )

2 respostas

  1. Best Answer

    Podemos usar .valuewith names_topara usar a segunda parte dos nomes das colunas para especificar as novas colunas para as quais esses valores devem ir.

    df |>
  pivot_longer(-Position, names_sep = "_", names_to = c("Group", ".value"))

    Resultado (na ordem encontrada, pode ser classificado)

    # A tibble: 10 × 4
   Position Group Width Error
      <int> <chr> <int> <dbl>
 1        1 A         3   0  
 2        1 B         4   0.3
 3        2 A         4   0.5
 4        2 B         5   0.6
 5        3 A         5   1  
 6        3 B         6   0.9
 7        4 A         6   1.5
 8        4 B         7   1.2
 9        5 A         7   2  
10        5 B         8   1.5
    • 2

  2. Você pode usar uma combinação de pivot_longerepivot_wider

    df %>% 
  pivot_longer(-Position) %>% 
  separate(name, into = c("Group", "x"), sep = "_") %>% 
  pivot_wider(names_from = x)

# A tibble: 10 × 4
   Position Group Width Error
      <int> <chr> <dbl> <dbl>
 1        1 A         3   0  
 2        1 B         4   0.3
 3        2 A         4   0.5
 4        2 B         5   0.6
 5        3 A         5   1  
 6        3 B         6   0.9
 7        4 A         6   1.5
 8        4 B         7   1.2
 9        5 A         7   2  
10        5 B         8   1.5
    • 1

relate perguntas