fake_proj/b0-import.R

# 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
}
jchrom/datamake documentation built on May 18, 2019, 10:23 p.m.