`keyfitz` <- function(b0,nMx){ nax12 <- c(0,0) nax12[1] <- b0[1] + b0[2] *nMx[1] nax12[2] <- 1.5 return(nax12) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.