R/myLeg.R

myLeg <-
function (vec, arrond) {
  x <- vec
  lx <- length(x)
  if (lx < 3) 
    stop("not enought classes")
  res <- character(lx )
  res
  for (i in 1:(lx ))
  {res[i] <- paste(round(x[i],arrond),sep="")
  }
  res
}

Try the rCarto package in your browser

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

rCarto documentation built on May 2, 2019, 8:20 a.m.