# wald.test return p value waldP <- function(X,Y){ df <- lm(Y~X) P <- wald.test(Sigma = vcov(df),b = coef(df),Terms = 2)$result$chi2['P'] return(c(P)) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.