library(rqdatatable) d <- data.frame(x = 1:3, y = 4:6) ops <- wrap(d) %.>% extend(., z := x + y) print(ops)
ops %.>% ex %.>% knitr::kable(.)
d %.>% knitr::kable(.)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.