R/clean.dataset.S

"clean.dataset" <- 
function(x)
{
	x[abs(x) < .Machine$double.eps] <- 0
	x[is.na(x)] <- 0
	x
}
harrysouthworth/kohonen documentation built on May 17, 2019, 3:03 p.m.