Original


“WaterStorage_Yearly Statistical Analysis for Cardinia Reservior.jpg”

Source: BOM - Water Storage, Filter - Cardinia Reservior.


Objective

The Objective of the BOM - Water Storage Data is to indicate the Cardinia Reservoir catchment area storage capacity and current storage levels to the general public in Melbourne East.

The visualisation chosen had the following three main issues:

  • BOM default visualisation in box plot which is indicating the min, max ranges, but not the average of the years.

  • BOM default visualisation is displaying water storage for particular year but not indicating the overall capacity

  • BOM default visualiation is used Gray and Blue color schema

Reference

Code

The following code was used to fix the issues identified in the original.

library(readr)  ## to read the csv file
library(ggplot2)  ## to plot the graphs

Cardinia_data <- read_csv("CardinaReservior_Data.csv")     ## to read the cardinia data in to dataset called Cardinia_data

## View(Cardinia_data)

 p2 <- ggplot(Cardinia_data, aes(Year))
 p2 <- p2 + geom_ribbon(aes(ymin=Min, ymax=Max), fill = "grey70")
 p2 <- p2 + geom_line(aes(y=Median), colour = "green")
 p2 <- p2 + labs (x = " Years (last 50) ", y = "Water Storage   Mega Litres", title ="New plot with continuous area Instead of discrete boxplots", 
 subtitle = "Cardinia Resorvoir water storage across the years")
 
p2

Data Reference
Please find the input paramters used in creating the original visualisation A copy of CardinaReservior_Data.csv is alsto attached.

Reconstruction

The following plot fixes the main issues in the original.