snippet plonger pivot_longer(${1:mydf}, cols = ${2:columns to pivot long}, names_to = "${3:desired name for category column}", values_to = "${4:desired name for value column}" ) snippet pwider pivot_wider(${1:mydf}, # id_cols = ${2:optional vector of unaffected columns}, names_from = c(${3:category column(s) to pivot wide}), values_from = c(${4:value column(s) that hold data for each category column}), names_sep = "_" )