Calculate Bandwidth proposed by Silverman for nonnormal data.
NSR(y)
y
a numeric vector of positive values.
h
y<-rexp(10,1) NSR(y)