# NOT RUN {
# y <- as.matrix(ChickWeight$weight)
# X <- matrix(cbind(ChickWeight$Time, ChickWeight$Diet == 1), ncol = 2)
# out <- bigKRLS(y, X, Ncores=1)
# summary(out)
# s = summary(out, digits = 2, labs = c("Time", "ChickWeightDiet"))
# knitr::kable(s[["ttests"]]) # to format with RNotebook or RMarkdown
# knitr::kable(s[["percentiles"]])
# Calcuate p-values using uncorrected standard errors (not recommended)
# summary(out, degrees = "N")
# }
Run the code above in your browser using DataLab