# NOT RUN {
# bind shadow columns
aq_sh <- bind_shadow(airquality)
# print data
aq_sh
# remove shadow columns
unbind_shadow(aq_sh)
# remove data
unbind_data(aq_sh)
# errors when you don't use data with shadows
# }
# NOT RUN {
unbind_data(airquality)
unbind_shadow(airquality)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab