pchisq.mix: P-value for a mixed Chi-Square

Usage Arguments Examples

Usage

1
pchisq.mix(q, df, mix = rep(1, length(df))/length(df))

Arguments

q
df
mix

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
##---- 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 (q, df, mix = rep(1, length(df))/length(df)) 
{
    pc <- function(df) if (df == 0) 
        1 * (q >= 0)
    else pchisq(q, df)
    sum(sapply(df, pc) * mix)
  }

gmonette/spida15 documentation built on May 17, 2019, 7:26 a.m.