library(webr) fit <- lm(mpg ~ am, data = mtcars) summary(fit)
--- title: "prueba_webr" format: html --- ```{webr-r} library(webr) fit <- lm(mpg ~ am, data = mtcars) summary(fit) ```