# NOT RUN {
# N <- 500
# P <- 4
# X <- matrix(rnorm(N*P), ncol=P)
# b <- 1:P
# y <- sin(X[,1]) + X %*% b + rnorm(N)
# out <- bigKRLS(y, X, Ncores=1)
# shiny.bigKRLS(out, "exciting_results", "The Results", c("Frequency", "xA", "xB", "xC"))
# }
Run the code above in your browser using DataLab