No Description
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

utils.R 194B

123456789
  1. "bits" <- function(object, bit) {
  2. (object %/% (2^bit)) %% 2
  3. }
  4. "bits<-" <- function(object, bit, value) {
  5. mask <- 2^bit
  6. object <- object+(value - ((object %/% mask) %% 2))*mask
  7. object
  8. }