-
Notifications
You must be signed in to change notification settings - Fork 5
/
ChisqSupp.R
19 lines (16 loc) · 773 Bytes
/
ChisqSupp.R
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
### actuar: Actuarial Functions and Heavy Tailed Distributions
###
### Definition of the {m,lev,mgf}chisq functions to compute raw and
### limited moments, and the moment generating function for
### the Chi-square distribution (as defined in R)
###
### See Chapter 17 of Johnson & Kotz, Continuous univariate
### distributions, volume 1, Wiley, 1970
###
### AUTHORS: Christophe Dutang, Vincent Goulet <[email protected]>
mchisq <- function(order, df, ncp = 0)
.External(C_actuar_do_dpq, "mchisq", order, df, ncp, FALSE)
levchisq <- function(limit, df, ncp = 0, order = 1)
.External(C_actuar_do_dpq, "levchisq", limit, df, ncp, order, FALSE)
mgfchisq <- function(t, df, ncp = 0, log = FALSE)
.External(C_actuar_do_dpq, "mgfchisq", t, df, ncp, log)