OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = 1000*A102343(n)+777. - R. J. Mathar, Feb 13 2025
MAPLE
select(isprime, [i*1000+777$i=1..150])[]; # Alois P. Heinz, Feb 12 2025
MATHEMATICA
Select[Table[1000 n + 777, {n, 200}], PrimeQ]
PROG
(PARI) select(x->((x % 1000)==777), primes(20000)) \\ Michel Marcus, Feb 12 2025
(PARI) select(isprime, vector(200, n, 1000*n+777)) \\ Michel Marcus, Feb 12 2025
(Python)
from itertools import count, islice
from sympy import isprime
def A381004_gen(): # generator of terms
return filter(isprime, count(777, 1000))
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Harvey P. Dale, Feb 11 2025
STATUS
approved