Update R-on-the-day-interactive.R

More changes