Datos:

diagrama de caja

mínimo

máximo

ancho de barra

histograma

gráfico de barras

diagrama de puntos

frecuencia máx.

marcar media

media

mostrar estadísticas

mediana

marcar mediana

data: {2, 15, 20, 0, 5, 25, 1, 0, 10, 12}
InputBox1_1 = Textfield(data)
mnd = Min(data)
mxd = Max(data)
b = false
hmn = 0
hmx = 25
spc = 1
hn: ceil((hmx - hmn) / spc)
list1 = Sequence(hmn + (i * spc), i, 0, hn)
InputBox2_1 = Textfield(hmn)
InputBox3_1 = Textfield(hmx)
InputBox4_1 = Textfield(spc)
d = false
e = false
avg = mean(data)
mdn = Median(data)
dq1 = Q1(data)
dq3 = Q3(data)
list2 = Zip(abs(z - avg), z, data)
mad = mean(list2)
list3 = DotPlot(data)
f = false
mxy: 2
InputBox5_1 = Textfield(mxy)
c = Histogram(list1, data, false)
ht = Max(Frequency[data])
g = false
B: (avg, 0)
a = BoxPlot(1, 0.5, data)
h = false
i: y = 0
A: (mdn, 0)
j = false
text1: "media: " + avg + "
mediana: " + mdn + "
Q1, Q3: " + dq1 + ", " + dq3 + "
MAD: " + mad + ""