Catherine pivot_wider

library(tidyr)

long <- data.frame(Lname = c("A","B","C"),
                   c = c("c1","c2","c2"),
                   country=c("NZ","NZ","AL"))

> pivot_wider(data=long, values_from="Lname",names_from="country")
# A tibble: 2 x 3
  c     NZ    AL   
  <chr> <chr> <chr>
1 c1    A     NA   
2 c2    B     C    

Change relevant bit to:

toString(unique(Lname))

hmm, I get same output with that?

but I can deal with this, thanks so much all!