# NOT RUN {
scala(serialize.output=TRUE)
identical(pi, scalaConvert(scalaConvert(pi)))
identical(mtcars, scalaConvert.data.frame(scalaConvert.data.frame(mtcars)))
dfInScala <- scalaConvert.data.frame(ToothGrowth)
dfInScala$keys()
dfInScala$apply("supp")$"_2"()
dfInScala$apply("supp")$"_1"()
# }
Run the code above in your browser using DataLab