rm(list = ls()) cat("\014") x <- runif(30, 0, 10) y <- 1 + 2*x + rnorm(30) lmFit <- lm_stan(x, y, iter = 1000) print(lmFit)
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.