Data Transform column to Row

[pillai]

looking for a efficient solution for the below scenario.
Column should go as row Value for Locs
Input DF

tribble(
    ~id, ~NY,  ~DC,
    "111",   "a,b,c", "xy,a,b"
)->d

Expecting Output as below

tribble(
    ~id, ~loc,  ~prop,
    "111", "NY",  "a,b,c",
    "111", "DC",  "xy,a,b"
)->d1

[pillai]

Converting Column names to row in R

cbind(setNames(stack(df1[,-3]),c('sale','v')), group=df1$group)

[JackDavison]

You can also use tidyr for a more modern solution:

> tidyr::pivot_longer(d, NY:DC, names_to = "loc", values_to = "prop")
# A tibble: 2 x 3
  id    loc   prop  
  <chr> <chr> <chr> 
1 111   NY    a,b,c 
2 111   DC    xy,a,b