11.1 Recreate Data

To provide us something to save, let us recreate the simple example shown in Section 10.1.

rm(list = ls())

i <- 0.05
t <- seq(from = 0, to = 5, by = 0.5)
accum <- (1 + i)^t
time <- c("Zero", "One Half", "One", "One+Half", "Two", 
          "Two+Half", "Three", "Three+Half", "Four", "Four+Half", "Five")
dat <- data.frame(time, t, accum)

After you run the code, check in the Global Environment Window to see that 4 variables and the data frame dat.