if (FALSE) {
library(sparklyr)
sc <- spark_connect(master = "local", version = "2.4.0", packages = "delta")
dir.create("text-in")
writeLines("A text entry", "text-in/text.txt")
text_path <- file.path("file://", getwd(), "text-in")
stream <- stream_read_text(sc, text_path) %>% stream_write_delta(path = "delta-test")
stream_stop(stream)
}
Run the code above in your browser using DataLab