Funkcja zaokrąglająca "krokowo"

Przedstawiam prostą funkcję, która zaokrągla liczbę do wartości najbliższego kroku:

roundStep<-function(x, step, start=0){
	if(missing(x)|missing(step))
		stop("Missing argument")
	return(round((x-start)/step)*step+start)
}

Created by Pretty R at inside-R.org

admin środa, 28 grudzień 2011 - 12:08 pm | | Blog-R
« Programistyczne probl… | Strona domowa | Ile miejsc po przecin… »