Perform Secure-by-default or Woefully Insecure ‘DNS’ Queries
Nevar pievienot vairāk kā 25 tēmas Tēmai ir jāsākas ar burtu vai ciparu, tā var saturēt domu zīmes ('-') un var būt līdz 35 simboliem gara.

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