R/pair.prod.R

Defines functions `pair.prod`

`pair.prod` <-
function(X)
    {
     d<-dim(X)
     matrix(.C("pairprod", as.double(X),as.integer(d), res=double(choose(d[1],2)*d[2]),PACKAGE="ICSNP")$res,ncol=d[2],byrow=T)
    }

Try the ICSNP package in your browser

Any scripts or data that you put into this service are public.

ICSNP documentation built on Sept. 18, 2023, 5:16 p.m.