Diamonds Data-Reproducible Pitch

This is a pitch for an RStudio shiny application that was developed for the Final Project of Developing Data Products course. The app shows a plot of diamonds data (carat vs. clarity) which is a reactive output as a result of server calculations. The user can select the color and the cut of the diamonds using the radio buttons and dropdown list. The user can also select the price range using the slider. The app also contains the documentation in the tab named “About”.

The dataset “diamonds” used in this app is a part of the “ggplot2” package. The ui.R code and the server.R code used for creating this app is available on https://github.com/AryaVa/DDP . The app can be accessed on https://aryava.shinyapps.io/Myfirstapp/ .

library(ggplot2)
head(diamonds,3)

# A tibble: 3 x 10
  carat cut     color clarity depth table price     x     y     z
  <dbl> <ord>   <ord> <ord>   <dbl> <dbl> <int> <dbl> <dbl> <dbl>
1  0.23 Ideal   E     SI2      61.5    55   326  3.95  3.98  2.43
2  0.21 Premium E     SI1      59.8    61   326  3.89  3.84  2.31
3  0.23 Good    E     VS1      56.9    65   327  4.05  4.07  2.31

The plot of Carat vs. Clarity is shown below. It includes all the variable parameters at once. The app, on the other hand, lets the user select the parameters and plots a customized graph.

graph<-ggplot(diamonds,aes(as.factor(clarity),carat,color=factor(color)))+
  geom_point(alpha=0.5)+
  labs(x="Clarity",y="Carat",title="Diamonds Data")+
  facet_grid(color~cut)