Data update

2024-10-16 18:07:41 -07:00 · 2024-10-16 18:07:41 -07:00 · 52a6ef48dd
commit 52a6ef48dd
parent 81fd053722
10248 changed files with 63654 additions and 6775 deletions
--- a/Task/Summarize-primes/Delphi/summarize-primes.delphi
+++ b/Task/Summarize-primes/Delphi/summarize-primes.delphi
--- a/Task/Summarize-primes/Julia/summarize-primes.julia
+++ b/Task/Summarize-primes/Julia/summarize-primes.julia
--- a/Task/Summarize-primes/Rust/summarize-primes.rust
+++ b/Task/Summarize-primes/Rust/summarize-primes.rust
--- a/Task/Summarize-primes/Uiua/summarize-primes.uiua
+++ b/Task/Summarize-primes/Uiua/summarize-primes.uiua
@ -1,4 +1,5 @@
-Primes ← ◌⍢(⊃(▽±◿⊙.⊸⊢|⊂:⊢)|≠0⧻)↘2⇡⊙[]80000
-IsPrime ← ∊:Primes
-⊙⊟⊚⊸IsPrime\+.Primes # Raw results
-⍉⇌⊂:+1⟜⍜(⊙⍉|⊏)       # Formatted
+IsPrime ← =1⧻°/×          # °/× finds primes factors.
+▽⊸≡IsPrime +1⇡1000        # Find primes in the target range.
+▽⊙(⍉⊂+1⇡⧻⟜⊟:)⊸≡IsPrime\+. # Scan sums, only keeping prime sums.
+&p$"Sequences of primes starting at 2 with prime sums\nLength\tLast\tSum"
+≡(&p$"_\t_\t_" °[⊙⊙∘])