A139034 Prime numbers appearing in A139033.

5, 41, 617, 1913, 3677, 5981, 10337, 16421, 32297, 51341, 72077, 98321, 142421, 212117, 288293, 371237, 457673, 570569, 722669, 899069, 1112513, 1360517, 1614533, 1874633, 2159789, 2451389, 2776289, 3158213, 3555113, 3967277, 4402877, 4878977, 5371781, 5925317

Offset

1,1

Links

Alois P. Heinz, Table of n, a(n) for n = 1..10000 (first 2000 terms from Zak Seidov)

Formula

a(n) = Sum_{i=1..n+1} A139033(i). - Alois P. Heinz, Jan 27 2023

Maple

s:= proc(n) option remember; `if`(n<1, 0, b(n)^2+s(n-1)) end:
b:= proc(n) option remember; local k, m;
      k:= s(n-1); for m from 1+b(n-1)
      while not isprime(k+m^2) do od; m
    end: b(1):=1:
a:= n-> s(n+1):
seq(a(n), n=1..34);  # Alois P. Heinz, Jan 27 2023

Crossrefs

Cf. A139033.

Sequence in context: A144286 A246760 A073854 * A104344 A100288 A076094

Adjacent sequences: A139031 A139032 A139033 * A139035 A139036 A139037

Keyword

nonn

Author

Zak Seidov, Apr 07 2008

Extensions

Terms corrected by Alois P. Heinz, Jan 27 2023

Status

approved