Update Main_Book_to_Stay.R

lower bound fix