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 - |
<pre>dec2bin <- function(num) { |
||
sub("^0+","",paste(rev(as.integer(intToBits(num))), collapse = "")) |
sub("^0+","",paste(rev(as.integer(intToBits(num))), collapse = "")) |
||
} |
} |
Revision as of 13:45, 22 April 2019
My Favorite Languages | |
Language | Proficiency |
AWK | --- |
C | --- |
R | --- |
Martin Møller Skarbiniks Pedersen, Danish Unix-guru.
Interests: programming languages, (math) puzzles
* Tasks not implemented in AWK
* Tasks not implemented in R
* [1]
as.integer(paste(rev(as.integer(intToBits(12))), collapse=""))
dec2bin <- function(num) { sub("^0+","",paste(rev(as.integer(intToBits(num))), collapse = "")) }