Skip to content

pivot_longer() doesn't repair names #694

@mgirlich

Description

@mgirlich

pivot_longer() doesn't repair names and produces incorrect results

library(dbplyr)
library(dplyr)
library(tidyr)

df <- memdb_frame(name2 = c("a", "b"), id = 1:2)

df %>% 
  pivot_longer(id, values_to = "name", names_repair = "unique")
#> # Source:   lazy query [?? x 2]
#> # Database: sqlite 3.35.5 [:memory:]
#>   name2  name
#>   <chr> <int>
#> 1 a         1
#> 2 b         2

df %>% 
  collect() %>% 
  pivot_longer(id, values_to = "name", names_repair = "unique")
#> New names:
#> * name -> name...2
#> * name -> name...3
#> # A tibble: 2 × 3
#>   name2 name...2 name...3
#>   <chr> <chr>       <int>
#> 1 a     id              1
#> 2 b     id              2

Created on 2021-08-17 by the reprex package (v2.0.1)

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Type

    No type
    No fields configured for issues without a type.

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions