inst/examples/rhrBaseLSCV.R

set.seed(123)
x <- rnorm(500)
y <- rnorm(500)
h <- seq(0.1, 5, 0.1)
s <- rhr:::rhrBaseLSCV(x, y, h)
h[which.min(s)]
jmsigner/rhr documentation built on June 26, 2020, 8:59 a.m.