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.
 
 

9 rindas
194 B

"bits" <- function(object, bit) {
(object %/% (2^bit)) %% 2
}
"bits<-" <- function(object, bit, value) {
mask <- 2^bit
object <- object+(value - ((object %/% mask) %% 2))*mask
object
}