|
Ker.norm=dnorm(u) |
|
Ker.cos=ifelse(abs(u)<=1,pi 4*(cos(pi*u="" 2)),0)<="" td="">
=1,pi> |
|
Ker.epa=ifelse(abs(u)<=1,3 4*(1-u^2),0)<="" td="">
=1,3> |
|
Ker.tri=ifelse(abs(u)<=1,35 32*(1-u^2)^3,0)<="" td="">
=1,35> |
|
Ker.quar=ifelse(abs(u)<=1,15 16*(1-u^2)^2,0)<="" td="">
=1,15> |
|
Ker.unif=ifelse(abs(u)<=1,1 2,0)<="" td="">
=1,1> |