added interactive linear regression on Swiss data set in shiny app