OFFSET
1,2
COMMENTS
a(37) > 20000. - Michael S. Branicky, Dec 27 2025
EXAMPLE
Prime gaps start 1, 2, 2, 4, 2, 4, 2, ...
The cumulative products are 1, 2, 4, 16, 32, 128, 256, ...
Adding 1 gives 2, 3, 5, 17, 33, 129, 257, ...
Primes occur at indices 1, 2, 3, 4, 7, ...
MATHEMATICA
seq[max_] := Position[1 + FoldList[Times, Differences[Prime[Range[max]]]], _?PrimeQ] // Flatten; seq[2500] (* Amiram Eldar, Nov 20 2025 *)
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Arvizzigno Gianni, Nov 18 2025
EXTENSIONS
a(21)-a(30) from Michel Marcus, Nov 20 2025
a(31)-a(33) from Amiram Eldar, Nov 20 2025
a(34)-a(36) from Michael S. Branicky, Dec 27 2025
a(37)-a(38) from Michael S. Branicky, Jan 10 2026
STATUS
approved
