R/random.R
In pathview: a tool set for pathway based data integration and visualization

random <-
function(x, na.rm=TRUE){
if(na.rm) x=x[!is.na(x)]
lenx=length(x)
if(lenx==0) return(NA)
ifelse(lenx==1, x, sample(x, 1))
}

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

pathview documentation built on May 2, 2019, 4:56 p.m.

Note that we can't provide technical support on individual packages. You should contact the package authors for that.

Try the pathview package in your browser