# NOT RUN {
d <- wrapr::build_frame(
'id', 'name_for_new_column' , 'value_to_take' |
1 , 'col1' , 'a' |
1 , 'col2' , '10' |
2 , 'col1' , 'b' |
2 , 'col2' , '20' )
spread_se(d,
key = 'name_for_new_column',
value = 'value_to_take')
# }
Run the code above in your browser using DataLab