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 Dec. 12, 2020, 2 a.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