R/utils.R

Defines functions .recycle_vector_to

.recycle_vector_to <- function(x, to_length) {
  x[
    ((seq_len(to_length) - 1) %% length(x)) + 1
  ]
}

Try the WoodburyMatrix package in your browser

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

WoodburyMatrix documentation built on July 9, 2023, 7:04 p.m.