if (FALSE) {
library(sparklyr)
sc <- spark_connect(master = "local")
# applies the (x -> x * x) transformation to elements of all arrays
copy_to(sc, tibble::tibble(arr = list(1:5, 21:25))) %>%
hof_transform(~ .x * .x)
}
Run the code above in your browser using DataLab