Displaying 1 result from an estimated 1 matches for "testsarmultinom".
2006 Jan 20
3
Troubles with the function rmultinom.c of the R's Random Number Generator
...andom
Number Generator through the wrapper:
#include <R.h>
#include <Rmath.h>
void F77_SUB(sarmultinom)(int n,
double* prob,
int K,
int* rN){
rmultinom(n, prob, K, rN);}
My fortran program is:
subroutine testsarmultinom(n,prob,K,rN)
implicit none
integer n,K,rN(K)
double precision prob(K)
call rndstart()
call sarmultinom(n,prob,K,rN)
call rndend()
end
In order to understand better how the function rmultinom.c works, I have
written an R code which calls this fortran subroutine as follows:
system("R CMD SHL...