Reppo for internal functions.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

7 lines
129 B

perc<-function(x, per100=T){
if (per100==T){
return(x*100/sum(x, na.rm = T))
}else{
return(x/sum(x, na.rm = T))
}
}