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)
);