Update ggplot2_app.r

Basic ggplot2 application