# IMPORT
save(mtcars, file = "data/b0-import.RData")
for (i in 1:2)
saveRDS(mtcars[i, ], file = paste0("mtcars", i, ".rds"))
if (length(mtcars) > 2)
dat = readRDS(file = "data/read_test.rds")
counter = 1
while (counter > 0) {
dat = readRDS(file = "data/read_test.rds")
counter = counter - 1
}
coutner = 1
repeat {
dat = readRDS(file = "data/read_test.rds")
counter = counter - 1
if (!counter > 0)
break
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.