skip.cov <-
function(x,cop = 6, MM = FALSE, op = 1, mgv.op = 0, outpro.cop = 3,
STAND = FALSE){
ans=skipcov(x,cop=cop,MM=MM,op=op,mgv.op=mgv.op,outpro.cop=outpro.cop,STAND=STAND)
list(cov=ans)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.