OFFSET
1,3
COMMENTS
The "Ponder This Challenge" of March 2024 asked for the smallest start value of sequences of at least 1000 (or 2024 to gain the bonus) composite numbers in a progression defined by A000217.
LINKS
IBM Research, Composite Sequences, Ponder This Challenge March 2024.
PROG
(PARI) a371000(upto) = {my(m=0); forcomposite (k=4, upto, for (j=1, oo, if (isprime(k+(j*(j+1))/2), if (j>m, print1(j-1, ", "); m=j); break)))};
a371000(10^7)
CROSSREFS
KEYWORD
nonn
AUTHOR
Karl-Heinz Hofmann and Hugo Pfoertner, Mar 09 2024
STATUS
approved