Optimal Airline Overbooking Simulation in R