1 | ancJNmpcp.sub(x, regfun = qreg, cov1 = FALSE, DEEP = TRUE)
|
x |
|
regfun |
|
cov1 |
|
DEEP |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | ##---- Should be DIRECTLY executable !! ----
##-- ==> Define data, use random,
##-- or do help(data=index) for the standard data sets.
## The function is currently defined as
function (x, regfun = qreg, cov1 = FALSE, DEEP = TRUE)
{
pts = NULL
z = elimna(x[, 1:3])
z2 = elimna(x[, 4:6])
res1 = ancJNmp(z[, 1:2], z[, 3], z2[, 1:2], z2[, 3], SEED = TRUE,
plotit = FALSE, DEEP = DEEP, regfun = regfun, cov1 = cov1)$output
v = min(res1[, 8])
v
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.