User:Martinmspedersen: Difference between revisions

Content added Content deleted
No edit summary
No edit summary
Line 13: Line 13:
* [https://rosettacode.org/wiki/Binary_digits]
* [https://rosettacode.org/wiki/Binary_digits]
<code>as.integer(paste(rev(as.integer(intToBits(12))), collapse=""))</code>
<code>as.integer(paste(rev(as.integer(intToBits(12))), collapse=""))</code>
<pre>dec2bin -> function(num) {
<code>
dec2bin -> function(num) {
sub("^0+","",paste(rev(as.integer(intToBits(num))), collapse = ""))
sub("^0+","",paste(rev(as.integer(intToBits(num))), collapse = ""))
}
}
</code>
</pre>