R/do_rsd.R

Defines functions do_rsd

do_rsd <-
function(x){
	
	sd_val<-sd(x,na.rm=TRUE)
	mean_val<-mean(x,na.rm=TRUE)
	cv_val<-100*(sd_val/(mean_val))
	return(cv_val)
}
kuppal2/xMWAS documentation built on April 15, 2021, 5:47 a.m.