aboutsummaryrefslogtreecommitdiff
path: root/challenge-023
diff options
context:
space:
mode:
authoraecepoglu <aecepoglu@fastmail.fm>2022-09-04 20:21:51 +0100
committeraecepoglu <aecepoglu@fastmail.fm>2022-09-04 20:21:51 +0100
commit6743e3e74bac2a9589257c78e496b30aed0378e0 (patch)
treec62daf6b701e32058b1a2e4f7f44852d21bbff6a /challenge-023
parent35658fb34d1cba6d98016bc8900699b42e92c547 (diff)
downloadperlweeklychallenge-club-6743e3e74bac2a9589257c78e496b30aed0378e0.tar.gz
perlweeklychallenge-club-6743e3e74bac2a9589257c78e496b30aed0378e0.tar.bz2
perlweeklychallenge-club-6743e3e74bac2a9589257c78e496b30aed0378e0.zip
solutions 1-56,177,180 missing a few
Diffstat (limited to 'challenge-023')
-rw-r--r--challenge-023/aecepoglu/README.md1
-rw-r--r--challenge-023/aecepoglu/bqn/ch-1.bqn2
-rw-r--r--challenge-023/aecepoglu/bqn/ch-2.bqn5
3 files changed, 8 insertions, 0 deletions
diff --git a/challenge-023/aecepoglu/README.md b/challenge-023/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-023/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-023/aecepoglu/bqn/ch-1.bqn b/challenge-023/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..7badb6f1bf
--- /dev/null
+++ b/challenge-023/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,2 @@
+# Task 1
+(-˜´˘2↕⊢)⍟2 ⟨5, 9, 2, 8, 1, 6⟩
diff --git a/challenge-023/aecepoglu/bqn/ch-2.bqn b/challenge-023/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..a805977c40
--- /dev/null
+++ b/challenge-023/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,5 @@
+# Task 2
+p←/ (1<n) {𝕩∧¬𝕨(≠∧(0=|))n}´⌽ 2↓ n←↕500 # sieve based primes
+f←p(0⊸=∘|/⊣)228
+d←1↓(↕(⊣/˜0=|)⊢)228
+p((+´d∊⊣⋆(1⊸+∘↕∘⌊⋆⁼))⌜/⊣)228 # prime decomposition