User:Martinmspedersen: Difference between revisions

Content added Content deleted

Inline

@@ Line 14: / Line 14: @@
      <code>as.integer(paste(rev(as.integer(intToBits(12))), collapse=""))</code>
      <code>
+dec2bin -> function(num) {
-library(magrittr)
-%>% intToBits %>% as.integer %>% rev %>% paste(collapse = "") %>% as.integer
+  sub("^0+","",paste(rev(as.integer(intToBits(num))), collapse = ""))
+}
 </code>