reduce itererations

examples/aog/penguinsViolins.jl

@@ -8,45 +8,46 @@ function getPenguins()
     penguins = dropmissing(DataFrame(PalmerPenguins.load()))
     return penguins
 end
-
-penguins = getPenguins()
-## declare new plot attributes
-palette = (color=tuple.(["#FC7808", "#8C00EC", "#107A78"], 0.65),
-    marker=[:circle, :utriangle, :rect])
-cycle = Cycle([:color, :marker], covary=true)
-
-p_len  = data(penguins) 
-p_len *= mapping(:flipper_length_mm => (t -> t / 10),
-    :bill_length_mm => (t -> t / 10))
-p_len *= mapping(color=:species, marker=:species)
-
-bpl = data(penguins)
-bpl *= mapping(:species, :bill_length_mm => (t -> t / 10), color = :species)
-bpl *= visual(Violin)
-
-bplt = data(penguins)
-bplt *= mapping(:species, :flipper_length_mm => (t -> t / 10), color = :species)
-bplt *= visual(Violin, orientation = :horizontal)
-
-with_theme(theme_light(), size = (600,400), palette=palette, Scatter=(cycle=cycle,)) do
-    fig = Figure()
-    axs = [Axis(fig[2,1], xlabel = "flipper length (cm)", ylabel = "bill length (cm)"),
-        Axis(fig[1,1]), Axis(fig[2,2])]
-    dots = draw!(axs[1], p_len)
-    draw!(axs[2], bplt)
-    draw!(axs[3], bpl)
-    ## getting the right layout aspect
-    colsize!(fig.layout, 1, Auto(4.0))
-    rowsize!(fig.layout, 1, Auto(1/3))
-    colgap!(fig.layout,3)
-    rowgap!(fig.layout, 3)
-    linkxaxes!(axs[1], axs[2])
-    linkyaxes!(axs[1], axs[3])
-    hidedecorations!.(axs[2:3], grid=false)
-    legend!(fig[1,2], dots)
-    fig
+let
+    penguins = getPenguins()
+    ## declare new plot attributes
+    palette = (color=tuple.(["#FC7808", "#8C00EC", "#107A78"], 0.65),
+        marker=[:circle, :utriangle, :rect])
+    cycle = Cycle([:color, :marker], covary=true)
+
+    p_len  = data(penguins) 
+    p_len *= mapping(:flipper_length_mm => (t -> t / 10),
+        :bill_length_mm => (t -> t / 10))
+    p_len *= mapping(color=:species, marker=:species)
+
+    bpl = data(penguins)
+    bpl *= mapping(:species, :bill_length_mm => (t -> t / 10), color = :species)
+    bpl *= visual(Violin)
+
+    bplt = data(penguins)
+    bplt *= mapping(:species, :flipper_length_mm => (t -> t / 10), color = :species)
+    bplt *= visual(Violin, orientation = :horizontal)
+
+    fig = with_theme(theme_light(), size = (600,400), palette=palette, Scatter=(cycle=cycle,)) do
+        fig = Figure()
+        axs = [Axis(fig[2,1], xlabel = "flipper length (cm)", ylabel = "bill length (cm)"),
+            Axis(fig[1,1]), Axis(fig[2,2])]
+        dots = draw!(axs[1], p_len)
+        draw!(axs[2], bplt)
+        draw!(axs[3], bpl)
+        ## getting the right layout aspect
+        colsize!(fig.layout, 1, Auto(4.0))
+        rowsize!(fig.layout, 1, Auto(1/3))
+        colgap!(fig.layout,3)
+        rowgap!(fig.layout, 3)
+        linkxaxes!(axs[1], axs[2])
+        linkyaxes!(axs[1], axs[3])
+        hidedecorations!.(axs[2:3], grid=false)
+        legend!(fig[1,2], dots)
+        fig
+    end
+
+    save("penguinsViolins.svg", current_figure()); # hide
 end
 
-save("penguinsViolins.svg", current_figure()); # hide
-
 # ![](penguinsViolins.svg)

examples/datavis/eigenvals_densities.jl

@@ -31,7 +31,7 @@ end
 m(;a=10rand()-5, b=10rand()-5) = [0 0 0 a; -1 -1 1 0; b 0 0 0; -1 -1 -1 -1]
 
 h = HeatMap(range(-3.5,3.5,length=1200), range(-3.5,3.5, length=1200))
-getcounts!(h, m; n=1_000_000)
+getcounts!(h, m; n=500_000)
 
 with_theme(theme_black()) do
     fig = Figure(figure_padding=0,size=(600,600))
@@ -47,7 +47,7 @@ end
 mtri() = Array(Tridiagonal(2rand(19) .-1, 2rand(20) .-1, 2rand(19) .-1))
 
 h = HeatMap(range(-3,3,length=1200÷2),range(-2,2,length=1200÷2))
-getcounts!(h, mtri; n=500_000)
+getcounts!(h, mtri; n=250_000)
 
 with_theme(theme_black()) do
     fig = Figure(figure_padding=0,size=(600,400))
@@ -62,7 +62,7 @@ end
 
 mβ(; n = 6) = 2rand(Beta(0.01,0.01), n,n) .-1
 h = HeatMap(range(-3,3,length=1200),range(-2,2,length=1200))
-getcounts!(h, mβ; n=1_000_000)
+getcounts!(h, mβ; n=500_000)
 
 with_theme(theme_black()) do
     fig = Figure(figure_padding=0,size=(600,400))
@@ -78,7 +78,7 @@ end
 
 m3(;a=9rand()-5,b=9rand()-5) = [a 1 -1; -1 b 0; 1 -1 -1]
 h = HeatMap(range(-4,4,length=1200),range(-2,2,length=1200))
-getcounts!(h, m3; n = 1_500_000)
+getcounts!(h, m3; n = 500_000)
 
 with_theme(theme_dark()) do
     fig = Figure(figure_padding=0,size=(600,400))
@@ -96,7 +96,7 @@ mtrin(; n =30) = Array(Tridiagonal(rand([-1.0,1.0],n-1), zeros(n), rand([-1.0,1.
 
 h = HeatMap(range(-2,2,length=1200),range(-2,2,length=1200))
 
-getcounts!(h, mtrin; n = 100_000)
+getcounts!(h, mtrin; n = 50_000)
 
 with_theme(theme_dark()) do
     fig = Figure(figure_padding=0,size=(600,600))
@@ -112,7 +112,7 @@ end
 
 mrand(; f=1000,n=8) = rand([-1.0, -1/f, 0, 1/f, 1.0],n,n)
 h = HeatMap(range(-2,2,length=800), range(-2,2,length=800))
-getcounts!(h, mrand; n = 500_000)
+getcounts!(h, mrand; n = 250_000)
 
 with_theme(theme_dark()) do
     fig = Figure(figure_padding=0,size=(600,600))

examples/datavis/eigenvals_evolution.jl

@@ -56,7 +56,7 @@ function m12(n=10)
     return a, b
 end 
 
-n = 150
+n = 100
 a, b =  m12(n)
 xs, ys = xy(a,b)
 colors = repeat(1:n,inner=500)