Equal prime and composite sums: Difference between revisions

→‎{{header|Wren}}: Added a further series term.
(→‎{{header|Wren}}: Added a further series term.)
Line 117:
 
=={{header|Wren}}==
RunsTakes quitearound quickly2 forminutes, Wrenwhich (30is seconds)respectable for Wren, but requiresuses a lot of memory.
<lang ecmascript>import "./math" for Int
import "./sort" for Find
import "/fmt" for Fmt
 
var limit = 4 * 1e8
var c = Int.primeSieve(limit - 1, false)
var compSums = []
Line 137:
}
}
 
for (i in 0...primeSums.count) {
var ix
if ((ix = Find.first(compSums, primeSums[i])) >= 0) {
Fmt.print("$,19d21d - $,11r12r prime sum, $,13r12r composite sum", primeSums[i], i+1, ix+1)
}
}</lang>
Line 146 ⟶ 147:
{{out}}
<pre>
10 - 3rd prime sum, 2nd composite sum
1,988 - 33rd prime sum, 51st composite sum
14,697 - 80th prime sum, 147th composite sum
83,292 - 175th prime sum, 361st composite sum
1,503,397 - 660th prime sum, 1,582nd composite sum
18,859,052 - 2,143rd prime sum, 5,699th composite sum
93,952,013 - 4,556th prime sum, 12,821st composite sum
89,171,409,882 - 118,785th prime sum, 403,341st composite sum
9,646,383,703,961 - 1,131,142nd prime sum, 4,229,425th composite sum
209,456,854,921,713 - 5,012,372nd prime sum, 19,786,181st composite sum
3,950,430,820,867,201 - 20,840,220th prime sum, 86,192,660th composite sum
</pre>
9,486

edits