A1 = 172
A2 = 178
A3 = 171
A4 = 164
A5 = 130
A6 = 158
A7 = 168
A8 = 123
A9 = 126
A10 = 141
A11 = 139
A12 = 146
A13 = 126
A14 = 148
A15 = 143
A16 = 142
A17 = 166
A18 = 138
A19 = 151
A20 = 166
A21 = 133
A22 = 145
A23 = 151
A24 = 159
A25 = 139
A26 = 154
A27 = 123
A28 = 174
A29 = 156
A30 = 154
A31 = 154
A32 = 139
A33 = 154
A34 = 132
A35 = 149
A36 = 165
A37 = 156
A38 = 136
A39 = 128
A40 = 190
A41 = 169
A42 = 156
A43 = 146
A44 = 138
A45 = 135
A46 = 141
A47 = 138
A48 = 140
A49 = 151
A50 = 141
A51 = 157
A52 = 144
A53 = 128
A54 = 167
A55 = 138
A56 = 131
A57 = 131
A58 = 143
A59 = 135
A60 = 157
A61 = 117
A62 = 167
A63 = 161
A64 = 154
A65 = 174
A66 = 147
A67 = 149
A68 = 136
A69 = 156
A70 = 129
A71 = 145
A72 = 150
A73 = 152
A74 = 148
A75 = 139
A76 = 142
A77 = 155
A78 = 130
A79 = 149
A80 = 135
A81 = 142
A82 = 141
A83 = 156
A84 = 132
A85 = 150
A86 = 147
A87 = 154
A88 = 130
A89 = 186
A90 = 145
A91 = 137
A92 = 159
A93 = 135
A94 = 140
A95 = 125
A96 = 146
A97 = 133
A98 = 157
A99 = 146
A100 = 134
Middelv = Mean(A1:A100)
Spredning = SD(A1:A100)
Kvartil25 = Q1(A1:A100)
Kvartil50 = Median(A1:A100)
Kvartil75 = Q3(A1:A100)
Vminimum = Min(A1:A100)
Vmaksimum = Max(A1:A100)
b = BoxPlot(-0.5, 0.2, A1:A100)
fnormal(x) = (Normal[Middelv, Spredning, x] * 100)
tekst1: "Vægten af 100 tændstikker - i milligram

Beskriv disse data.
Med minimum: " + Vminimum + " og maksimum: " + Vmaksimum + "
Med kvartilsæt:    " + Kvartil25 + ", " + Kvartil50 + ", " + Kvartil75 + "
Med histogram og boksplot.
Og normalfordeling frekvenskurve (rød)."
a = HistogramRight({100, 110, 120, 130, 140, 150, 160, 170, 180, 190, 200}, A1:A100)