if (FALSE) {
# Get generic dataset from R
data("adult")
# Aggregate it using aggregate_by_key, in order to extract characteristics for each country
adult_aggregated <- aggregate_by_key(adult, key = 'country')
# Example with other functions
power <- function(x) {sum(x^2)}
adult_aggregated <- aggregate_by_key(adult, key = 'country', functions = c("power", "sqrt"))
# sqrt is not an aggregation function, so it wasn't used.
}
# "##NOT RUN:" mean that this example hasn't been run on CRAN since its long. But you can run it!
Run the code above in your browser using DataLab