# NOT RUN {
roundtrip <-
dm_nycflights13() %>%
dm_wrap_tbl(root = flights) %>%
dm_unwrap_tbl(ptype = dm_ptype(dm_nycflights13()))
roundtrip
# The roundtrip has the same structure but fewer rows:
dm_nrow(dm_nycflights13())
dm_nrow(roundtrip)
# }
Run the code above in your browser using DataLab