reset
set border
set xtics 2
set ytics 2
set grid lt 9
set xzeroaxis lt -1 lw 2
set yzeroaxis lt -1 lw 2
set style line 1 lt 20 lw 4
set style line 2 lt 5 lw 3
set style line 3 lt 12 lw 3
set xrange [-10:10]
set yrange [-5:18]
k=16
r=8
f(x)=k+(-k*x*x)/(r*r)
plot f(x) ls 1