Skip to content

Commit

Permalink
Move test to correct file
Browse files Browse the repository at this point in the history
  • Loading branch information
markfairbanks committed Oct 21, 2022
1 parent 2ae547d commit f2d38dd
Showing 1 changed file with 0 additions and 13 deletions.
13 changes: 0 additions & 13 deletions tests/testthat/test-step-call-pivot_longer.R
Original file line number Diff line number Diff line change
Expand Up @@ -167,16 +167,3 @@ test_that("can pivot all cols to long", {
expect_equal(out$value, c(1, 2, 3, 4))
})

test_that("correctly handles columns named NA when using names_glue, #394", {
df <- tibble(x = c("a", "a"), y = c("a", NA), z = 1:2)

res <- lazy_dt(df) %>%
pivot_wider(names_from = y,
values_from = z,
names_glue = "{y}_new",
names_repair = "minimal") %>%
collect()

expect_named(res, c("x", "NA_new", "a_new"))
})

0 comments on commit f2d38dd

Please sign in to comment.