R/factorise.R

In PietaSchofield/plibb: Pieta Schofield's repository of former useful R functions

Defines functions factorise

Documented in factorise

#' find divisors of an integer
#'
#' @export
factorise <- function(x) {
  x <- as.integer(x)
  y <- seq_len(abs(x))
  y[x %% y == 0L]
}