Dynamic arrays

count <- 5
nums <- numeric(count)
nums[1] <- 1
# nums = 1 0 0 0 0

cat("nums =", nums, "\n")

# An index past the end grows it, gaps are NA
nums[8] <- 1
# nums = 1 0 0 0 0 NA NA 1

cat("nums =", nums, "\n")