diff options
| -rw-r--r-- | challenge-102/richard-park/apl/ch-1.aplf | 1 | ||||
| -rw-r--r-- | challenge-102/richard-park/apl/ch-2.aplf | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/challenge-102/richard-park/apl/ch-1.aplf b/challenge-102/richard-park/apl/ch-1.aplf new file mode 100644 index 0000000000..b74dd2ed79 --- /dev/null +++ b/challenge-102/richard-park/apl/ch-1.aplf @@ -0,0 +1 @@ + RareNumbers←{⍵⌿⍨⍵(+∧⍥(⊢=⌊)∘(*∘0.5)-)(10(⊖_U_(⊥⍣¯1))⊢)⍨⍵}
\ No newline at end of file diff --git a/challenge-102/richard-park/apl/ch-2.aplf b/challenge-102/richard-park/apl/ch-2.aplf new file mode 100644 index 0000000000..406f40ad99 --- /dev/null +++ b/challenge-102/richard-park/apl/ch-2.aplf @@ -0,0 +1 @@ +HashCountingString←{⍵=1:'#' ⋄ ⍵=0:'' ⋄ hcs←('#',⍨⍕⍵) ⋄ hcs,⍨∇ ⍵-≢hcs}
\ No newline at end of file |