Nothing
## -----------------------------------------------------------------------------
library(basetable)
## -----------------------------------------------------------------------------
subset(mtcars, cyl == 6, select = c("mpg", "hp", "wt"))
## -----------------------------------------------------------------------------
mtcars |>
pick(c("mpg", "hp", "wt", "cyl")) |>
aggregate(by = "cyl", value = c("mpg", "hp"), fun = mean)
## -----------------------------------------------------------------------------
mtcars |>
basetable::subset(cyl == 6) |>
basetable::pick(c("mpg", "hp", "wt")) |>
basetable::transform(power = hp / wt)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.