start plotting blog

LearnJulia/src/line_graph_blog_post.jl

@@ -3,6 +3,8 @@ using DataFrames
 using Chain
 using DataFramesMeta
 using Dates
+using CairoMakie
+using AlgebraOfGraphics
 
 # Load Data
 df_raw = DataFrame(XLSX.readtable(joinpath("data", "Tableau_practice_data.xlsx"), "05 - Flu Occurrence FY2013-2016"; infer_eltypes=true))
@@ -14,11 +16,15 @@ x = replace(x, " " => "_", "+" => "pos", "(" => "", ")" => "", "%" => "pct")
 return x
 end
 
-
+#need to convert flu year to categroical
 
 df = @chain df_raw begin
   rename(format_names, _)
   @rtransform  :month = Dates.month(:date)  #transform by Row
   @rtransform  :year = Dates.year(:date)  #transform by Row
-  
+  @rtransform  :flu_year = ifelse(:month >= 10, :year + 1, :year)
 end
+
+plt = data(df) * mapping(:month, :pct_tests_pos_for_influenza; color = :flu_year) * visual(Lines)
+
+draw(plt)

Project.toml

@@ -1,5 +1,7 @@
 [deps]
+AlgebraOfGraphics = "cbdf2221-f076-402e-a563-3d30da359d67"
 CSV = "336ed68f-0bac-5ca0-87d4-7b16caf5d00b"
+CairoMakie = "13f3f980-e62b-5c42-98c6-ff1f3baf88f0"
 CategoricalArrays = "324d7699-5711-5eae-9e2f-1d82baa6b597"
 Chain = "8be319e6-bccf-4806-a6f7-6fae938471bc"
 Cleaner = "caabdcdb-0ab6-47cf-9f62-08858e44f38f"