login
A388261
Primes that are the sum of some first primes minus one.
1
439, 1987, 3637, 4027, 6337, 6869, 7417, 8581, 11239, 25799, 32983, 34267, 36887, 38237, 42467, 45433, 50077, 61909, 63703, 67399, 89671, 96281, 98533, 103171, 125507, 128111, 220511, 224047, 238519, 253537, 281063, 336041, 345011, 358681, 372611, 382037, 415861, 420811
OFFSET
1,1
COMMENTS
The number of "some first primes" are the terms in A388066.
Primes in A237589.
LINKS
FORMULA
a(n) = A237589(A388066(n)) = A007504(A388066(n)) - 1.
MAPLE
select(isprime, ListTools:-PartialSums([seq(ithprime(i), i=1..1000)]) -~ 1); # Robert Israel, Sep 18 2025
MATHEMATICA
Select[Accumulate[Prime[Range[400]]] - 1, PrimeQ] (* Amiram Eldar, Sep 16 2025 *)
PROG
(Python)
from sympy import sieve, isprime
print([(s-1) for k in range(1, 370, 2) if isprime((s:=sum(sieve[1:k+1]))-1)])
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Karl-Heinz Hofmann, Sep 16 2025
STATUS
approved