The relevant parts of the code (where mintemperature and maxtemperature are dataframes) are
temperature = innerjoin(mintemperature, maxtemperature, on = [:"Bureau of Meteorology station number", :Year, :Month, :Day], makeunique=true)
tstartstop = @chain temperature begin
groupby(Symbol("Bureau of Meteorology station number"))
combine(:Year => minimum, :Year=>maximum)
transform!([:Year_minimum, :Year_maximum] => ((x,y) -> y.-x) => :"Year_total")
end
axis = (width = 1000, height = 750)
sr = renamer(70349=>"Mount Ginini. [$(tstartstop[tstartstop."Bureau of Meteorology station number".==70349, "Year_total"][1]) Years]",
70351=>"Canberra Airport [$(tstartstop[tstartstop."Bureau of Meteorology station number".==70351, "Year_total"][1]) Years]")
pcr = renamer("IDCJAC0010"=>"Daily Maximum", "IDCJAC0011"=>"Daily Minimum")
tr2 = renamer(1=>"Jan",
2=>"Feb",
3=>"Mar",
4=>"Apr",
5=>"May",
6=>"Jun",
7=>"Jul",
8=>"Aug",
9=>"Sep",
10=>"Oct",
11=>"Nov",
12=>"Dec")
tm = (mapping(:Month=>tr2,
:"Minimum temperature (Degree C)"=>"Temperature (Degree C)",
color=:"Product code"=>pcr, dodge=:"Product code"=>pcr,
col=:"Bureau of Meteorology station number"=>sr)+
mapping(:Month=>tr2,
:"Maximum temperature (Degree C)"=>"Temperature (Degree C)",
color=:"Product code_1"=>pcr, dodge=:"Product code"=>pcr,
col=:"Bureau of Meteorology station number"=>sr))
tplt = (data(dropmissing(temperature)) * tm * visual(BoxPlot))
tfig = draw(tplt; axis)
I’ve tried
visual(BoxPlot; color=[:red, :blue])
and
visual(BoxPlot; color=[[:red, :blue],[:red,:blue]])
both are ignored without throwing an error