R/round.spec.R

Defines functions round.spec

round.spec <-
function(x){ 
		x<- round(x*100)
		if(x > 100){x <- 100}
		if(is.na(x)){x <- 1}
		return(x)
		}

Try the mqqc package in your browser

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

mqqc documentation built on March 18, 2018, 1:09 p.m.