Nothing
R/nStirling2.R
In kStatistics: Unbiased Estimators for Cumulant Products and Faa Di Bruno's Formula
nStirling2 <-
function (n, k) {
if (n<0) stop("n < 0")
if (k<0) stop("k < 0")
if (k>n) stop("k > n")
m<-0;
for (j in 0:k) m<-m+(-1)^(k-j)*choose(k,j)*j^n;
return(m/factorial(k));
}
Try the kStatistics package in your browser
Any scripts or data that you put into this service are public.
kStatistics documentation built on June 8, 2022, 5:05 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
nStirling2 <-
function (n, k) {
if (n<0) stop("n < 0")
if (k<0) stop("k < 0")
if (k>n) stop("k > n")
m<-0;
for (j in 0:k) m<-m+(-1)^(k-j)*choose(k,j)*j^n;
return(m/factorial(k));
}
Try the kStatistics package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.