# generic commands for twographbox output size
load "twographbox.in"
set data style lines
set xlabel ""
set ylabel ""
set xrange [-10:10]
set yrange [0: 1.0]
set samples 1000
set ytics 0, .5, 1.0

gauss(x) = (1/(2*pi)**.5) * exp(-0.5*x**2)
tri(x) = (1 - abs(x)) * (abs(x) < 1)
co(x) = (pi/4)*cos(pi/2*x)*(abs(x) < 1)
u(x) = (1/5.) * (abs(x) < 2.5)
max(x, y) = x > y ? x : y
quad(x, k) = max(0, 1 - (2*abs(x)/k)**2)
# more at http://en.wikipedia.org/wiki/Kernel_(statistics)

set output "kernel.eps"

#plot [-12:12] .5*tri(.5*(x+8)) title "" lw 2, gauss(x) title "" lw 2 lt 1,  .333*co(.333*(x-8.5)) title ""  lw 2 lt 1, 'kernel.data' with points ps 1.5 pt 7 title ""

plot quad(x, 10) title "" lw 2 lt 1, 'zero.data' with points ps 1.5 pt 7 title ""