Ralston Fonseca
Oct 8th, 2018
We will be using diamonds dataset in R for this assignment. Use ?diamonds to get info on the dataset. The focus will be on the shiny apps controls for this assigment.
R Studio's Shiny Apps is used used to create this application. It is deployed on Shinyapps.io the link for which is in this presentation.
Below is a overview of the diamonds dataset.
library(ggplot2)
str(diamonds)
Classes 'tbl_df', 'tbl' and 'data.frame': 53940 obs. of 10 variables:
$ carat : num 0.23 0.21 0.23 0.29 0.31 0.24 0.24 0.26 0.22 0.23 ...
$ cut : Ord.factor w/ 5 levels "Fair"<"Good"<..: 5 4 2 4 2 3 3 3 1 3 ...
$ color : Ord.factor w/ 7 levels "D"<"E"<"F"<"G"<..: 2 2 2 6 7 7 6 5 2 5 ...
$ clarity: Ord.factor w/ 8 levels "I1"<"SI2"<"SI1"<..: 2 3 5 4 2 6 7 3 4 5 ...
$ depth : num 61.5 59.8 56.9 62.4 63.3 62.8 62.3 61.9 65.1 59.4 ...
$ table : num 55 61 65 58 58 57 57 55 61 61 ...
$ price : int 326 326 327 334 335 336 336 337 337 338 ...
$ x : num 3.95 3.89 4.05 4.2 4.34 3.94 3.95 4.07 3.87 4 ...
$ y : num 3.98 3.84 4.07 4.23 4.35 3.96 3.98 4.11 3.78 4.05 ...
$ z : num 2.43 2.31 2.31 2.63 2.75 2.48 2.47 2.53 2.49 2.39 ...
table(diamonds$color)
D E F G H I J
6775 9797 9542 11292 8304 5422 2808
table(diamonds$clarity)
I1 SI2 SI1 VS2 VS1 VVS2 VVS1 IF
741 9194 13065 12258 8171 5066 3655 1790
Let's take a look a the application which will help us undertand the usage described in the next slide.
The Diamond Features and Price application has following input variables:
As the values change, the Price Vs Carat graph changes. The data is filtered based on your selection criteria. Different lines are showed for different types of Diamond Cuts.
Note: Sometimes you may not see any changes when you change the values that is due to no values existing for that criteria.
The application is hosted on Shinyapps.io . Use the following link to access the application: https://demo-shiny-apps.shinyapps.io/diamond_shiny_app/
The Code is available on GitHub in UI and Server code is available on Github in app.R file. https://github.com/RalstonFonseca/Shiny-Apps