Added max.attempts for optim/tryCatch, set sd for norm to 1/2 of lb,
added optim.opt$value <- Inf
Added Old Faithful eruptions example
Added setting/saving existing seeds so that the function returns the
same results when called on the same data (otherwise different random
initial values could throw off the user)
Cleaning up Old Faithful example