Perform Secure-by-default or Woefully Insecure ‘DNS’ Queries
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.

10 line
194B

  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. }