# NOT RUN {
n <- 1000
x <- bit(n)
ceiling(n / (300 %/% sum(.rambytes["logical"])))
chunk(x, BATCHBYTES=300)
ceiling((n/2) / (100 %/% sum(.rambytes["logical"])))
chunk(x, from=1, to = n/2, BATCHBYTES=100)
rm(x, n)
# }
Run the code above in your browser using DataCamp Workspace