Nothing
## ----setup, include=FALSE-----------------------------------------------------
knitr::opts_chunk$set(echo = TRUE,comment = NA,fig.width=6,fig.height = 5, fig.align='center',out.width="90%")
## ----eval=FALSE---------------------------------------------------------------
# #install.packages("devtools")
# devtools::install_github("cardiomoon/webr")
## ----message=FALSE------------------------------------------------------------
require(moonBook)
require(webr)
# chi-squared test
x=chisq.test(table(acs$sex,acs$DM))
x
plot(x)
## -----------------------------------------------------------------------------
t.test(acs$age,mu=63)
plot(t.test(acs$age,mu=63))
## -----------------------------------------------------------------------------
x=var.test(age~DM,data=acs)
x
plot(x)
## -----------------------------------------------------------------------------
x=t.test(age~DM,data=acs)
x
plot(x)
## -----------------------------------------------------------------------------
var.test(BMI~sex,data=acs)
plot(var.test(BMI~sex,data=acs))
## -----------------------------------------------------------------------------
x=t.test(BMI~sex,data=acs,var.equal=TRUE)
x
plot(x)
## -----------------------------------------------------------------------------
x=t.test(iris$Sepal.Width,iris$Petal.Width,paired=TRUE)
plot(x)
## -----------------------------------------------------------------------------
x=t.test(BMI~sex, data=acs,conf.level=0.99,alternative="greater",var.equal=TRUE)
plot(x)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.