frero/project_euler
0
1
Fork 0
Code Issues Pull Requests Releases Activity

solve problem 69 in uiua

Browse Source
This commit is contained in:
Fredrik Robertsen
2025-08-30 00:06:34 +02:00
parent 849deeec75
commit d50e643224
1 changed files with 14 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
69/solution.uiua Normal file
View File

@@ -0,0 +1,14 @@
# project euler 69
# euler totient function
# n ? Φ(n)
Φ ← ⁅×/×-⊸÷⊙1◴⊸°/× # from uiua discord by maweo
# find n that maximizes n÷Φ(n)
# range ? max_n÷Φ(n)
s ← ▽⊸(=⊸/↥÷)⊸≡Φ
s +1⇡1e6
# online solution
# https://uiua.org/pad?src=0_17_0-dev_2__IyBwcm9qZWN0IGV1bGVyIDY5CgojIGV1bGVyIHRvdGllbnQgZnVuY3Rpb24KIyBuID8gzqYobikKzqYg4oaQIOKBhcOXL8OXLeKKuMO34oqZMeKXtOKKuMKwL8OXICMgYnkgZGlzY29yZDptYXdlbwoKIyBzb2x1dGlvbgojIHJhbmdlID8gbWF4X27Dt86mKG4pCnMg4oaQIOKWveKKuCg94oq4L-KGpcO3KeKKuOKJoc6mCgpzICsx4oehMWU2Cg==