lband.fun2 <- function(m,crit,alpha=.05){ x<-m[,1] y<-m[,2] val<-abs(alpha-lband.fun(x,y,crit)) val }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.