http://t3x.org/klong-stat/f12.kg.html (light|dark)
.l("config.kg")
grid([-3 3 1];[0 0.5 0.1])
Create normally distributed frequency distribution
F::freq(ndf;30;[-3 3])
Use 10 degrees of freedom
df::10
Bar-plot a histograms of means of F
barplot(hist(df;F))
Scatter-plot the frequency distribution F
setdot(7) fillrgb(0.7;0.5;1.0) scplot(F)
Compute and plot a spline through F
S::spl(df;(((!#F)%29%6)-3),'F) plot(sp(;S))
Scatter-plot the knots of the spline (yes, splines can be scatter-plotted!)
fillgray(0) scplot2(S) draw()