HW8_2

2. Create a dashboard where your plots and tables are centered on a common theme. You need at least 3 displays on your dashboard; you don’t need a table if you choose not to.

## `geom_smooth()` using method = 'gam' and formula 'y ~ s(x, bs = "cs")'

## Warning in if (params$x != 0) {: the condition has length > 1 and only the
## first element will be used

## Warning in if (params$y != 0) {: the condition has length > 1 and only the
## first element will be used

## `geom_smooth()` using method = 'gam' and formula 'y ~ s(x, bs = "cs")'