# NOT RUN {
dL <- build_frame(
"x", "y" |
2L , "b" |
1L , "a" |
3L , "c" )
rquery_pipeline <- local_td(dL) %.>%
rename_columns(., c("x" = "y", "y" = "x"))
dL %.>% rquery_pipeline
# }
Run the code above in your browser using DataLab