1 |
kappa |
|
p |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | ##---- 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 (kappa, p)
{
prob = 1 - kappa
chip = qchisq(prob, p)
r = sqrt(chip)
tau = (p * pchisq(chip, p + 2) + chip * (1 - prob))/p
Results = list(r = r, tau = tau)
return(Results)
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.