dplyr
and sparklyr
Run DEV version of dplyr
and CRAN sparklyr
as of 5-14-2017.
# devtools::install_github("tidyverse/dplyr")
# devtools::install_github('tidyverse/dbplyr')
# devtools::install_github('rstudio/sparklyr')
suppressPackageStartupMessages(library('dplyr'))
packageVersion("dplyr")
## [1] '0.5.0.9005'
library('sparklyr')
packageVersion("sparklyr")
## [1] '0.5.4'
if(requireNamespace("dbplyr", quietly = TRUE)) {
packageVersion("dbplyr")
}
## [1] '0.0.0.9001'
R.Version()$version.string
## [1] "R version 3.4.0 (2017-04-21)"
base::date()
## [1] "Mon May 15 15:10:00 2017"
sc <- sparklyr::spark_connect(version='2.0.2',
master = "local")
d1 <- copy_to(sc, data.frame(x=1:3, y=4:6), 'd1',
overwrite = TRUE)
d2 <- copy_to(sc, data.frame(x=1:3, y=7:9), 'd2',
overwrite = TRUE)
left_join(d1, d2, by='x')
## Source: lazy query [?? x 3]
## Database: spark_connection
## Error: Column `y` must have a unique name
dLocal <- data.frame(x = 1:2,
origCol = c('a', 'b'),
stringsAsFactors = FALSE)
d <- copy_to(sc, dLocal, 'd',
overwrite = TRUE)
# local
rename(dLocal, x2 = x, origCol2 = origCol)
## x2 origCol2
## 1 1 a
## 2 2 b
# Spark
rename(d, x2 = x, origCol2 = origCol)
## Source: lazy query [?? x 2]
## Database: spark_connection
## Error in names(select)[match(old_vars, vars)] <- new_vars: NAs are not allowed in subscripted assignments
spark_disconnect(sc)
rm(list=ls())
gc(verbose = FALSE)
## used (Mb) gc trigger (Mb) max used (Mb)
## Ncells 677545 36.2 1168576 62.5 1168576 62.5
## Vcells 1167395 9.0 2060183 15.8 1420902 10.9
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.