Sieht gut aus. Etwas aufhübschen?
ich würde dann beide plots einbetten und mit print kannst Du besser hübschen:
stat(list):=block(
   Median:median(list),
   Mittel:mean(list),
   Varianz:var(list),
   Stabdiagramm:wxbarsplot(list),
   Boxplot:wxboxplot(list),
   print(Median,Mittel,Varianz),
   Stabdiagramm,
   Boxplot
   
);
oder mit Reihenfolge eingehalten
stat(list):=block(
    Median:median(list),
    Mittel:mean(list),
    Varianz:var(list),
    print(Median,Mittel,Varianz),
    wxbarsplot(list),
    wxboxplot(list)
    
);