if (FALSE) { # interactive()
# Set site defaults
sp_defaults(site = "Data Analytics")
# Write a file
sp_write(mtcars, "mtcars.csv")
# Write a file, specifying type and adding additional parameters
sp_write(mtcars, "mtcars.txt", type = "dataframe", delim = "|")
# Read a file
x <- sp_read("mtcars.csv")
y <- sp_read("mtcars.txt", type = "dataframe", delim = "|")
# Save / load an .rdata file using ms_drive methods
dr <- sp_drive() # Get stored default ms_drive object
dr$save_rdata(x, y, file = "data.rdata")
dr$load_rdata("data.rdata")
}
Run the code above in your browser using DataLab