# start with N = number of repetitions
#
lunch = rep(NA, times = N)
rand = runif(N,0,1)
if (rand[1] < .5) {lunch[1] = "taco"} else {lunch[1] = "pizza"}
for (i in 2:N) {
   if ((lunch[i-1] == "taco") & (rand[i] < .6)) {lunch[i] = "pizza"}
   if ((lunch[i-1] == "taco") & (rand[i] >= .6)) {lunch[i] = "taco"}
   if ((lunch[i-1] == "pizza") & (rand[i] < .8)) {lunch[i] = "taco"}
   if ((lunch[i-1] == "pizza") & (rand[i] >= .8)) {lunch[i] = "pizza"}
}
table(lunch)