R/unique.circular.R

unique.circular <- function (x, ...) {
  z <- unique.default(x, ...)
  circularp(z) <- circularp(x)
  class(z) <- class(x)
  return(z)
}
apjmason/circular documentation built on Dec. 19, 2021, 4:33 a.m.