diff options
| author | Abigail <abigail@abigail.be> | 2021-04-16 02:16:18 +0200 |
|---|---|---|
| committer | Abigail <abigail@abigail.be> | 2021-04-16 02:16:18 +0200 |
| commit | 3254688724274330eac26ea83d5c76028fe421aa (patch) | |
| tree | 73612e28d933a0151f848ee01030115f6a28046d | |
| parent | 6d77ad28625fb12bad358b00aa4746c9df714392 (diff) | |
| download | perlweeklychallenge-club-3254688724274330eac26ea83d5c76028fe421aa.tar.gz perlweeklychallenge-club-3254688724274330eac26ea83d5c76028fe421aa.tar.bz2 perlweeklychallenge-club-3254688724274330eac26ea83d5c76028fe421aa.zip | |
R solution for week 108, part 1
| -rw-r--r-- | challenge-108/abigail/README.md | 1 | ||||
| -rw-r--r-- | challenge-108/abigail/r/ch-1.r | 15 |
2 files changed, 16 insertions, 0 deletions
diff --git a/challenge-108/abigail/README.md b/challenge-108/abigail/README.md index b91c6ce23b..66ded7e046 100644 --- a/challenge-108/abigail/README.md +++ b/challenge-108/abigail/README.md @@ -11,6 +11,7 @@ location in the memory. * [Pascal](pascal/ch-1.p) * [Perl](perl/ch-1.pl) * [Python](python/ch-1.py) +* [R](r/ch-1.r) ### Blog diff --git a/challenge-108/abigail/r/ch-1.r b/challenge-108/abigail/r/ch-1.r new file mode 100644 index 0000000000..e293055ccd --- /dev/null +++ b/challenge-108/abigail/r/ch-1.r @@ -0,0 +1,15 @@ +# +# See ../README.md +# + +# +# Run as: Rscript ch-1.r +# + +x <- 0 +cat (sprintf ("%.0f\n", + as.numeric ( + paste0 ("0x", + substring ( + sub (" .*$", "", + capture.output (.Internal (inspect (x)))), 2))))) |