Ramanujan primes: Difference between revisions
→{{header|F_Sharp|F#}}
SqrtNegInf (talk | contribs) (Added Perl) |
|||
Line 117:
// Ramanujan primes. Nigel Galloway: September 7th., 2021
let fN g=if isPrime g then 1 else if g%2=1 then 0 else if isPrime(g/2) then -1 else 0
let rP p=let N,G=Array.create p 0,(Seq.item(3*p-2)(primes32()))
let n=rP 100000
n.[0..99]|>Array.iter(printf "%d "); printfn ""
Line 129:
The 100000th Ramanujan prime is 2916539
</pre>
=={{header|Go}}==
{{trans|Wren}}
| |||