Ile miejsc po przecinku ?
Zaszła potrzeba, aby dowiedzieć się ile miejsc po przecinku ma pewna zmienna...
howManyDecimals<-function(x){ if(!is.numeric(x)) stop("x must be numeric!") return(nchar(unlist(strsplit(as.character(x),'.',fixed=TRUE))[2])) }
Created by Pretty R at inside-R.org
Jedyną wadą tej funkcji jest ograniczenie wynikające z obcięcia części dziesiętnej liczby przez wykorzystaną funkcję as.character().
