"n.plt"<- function(n) { if(n == 1) m <- c(1, 1) else if(n == 2) m <- c(1, 2) else if(n == 3) m <- c(1, 3) else if(n == 4) m <- c(2, 2) else m <- c(2, 3) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.