OFFSET
1,1
COMMENTS
Also numbers k such that (10^12*k + 235711131719) is prime. - Stefan Steinerberger, Feb 15 2006
LINKS
Daniel Starodubtsev, Table of n, a(n) for n = 1..10000
EXAMPLE
If k = 5, then k235711131719 = 5235711131719 (prime).
If k = 38, then k235711131719 = 38235711131719 (prime).
If k = 72, then k235711131719 = 72235711131719 (prime).
MAPLE
q:= n-> isprime(parse(cat(n, 235711131719))):
select(q, [$1..1000])[]; # Alois P. Heinz, May 12 2021
MATHEMATICA
For[n = 1, n < 500, n++, If[PrimeQ[10^12*n + 235711131719], Print[n]]] (* Stefan Steinerberger, Feb 15 2006 *)
PROG
(PARI) ok(n)={isprime(n*10^12+235711131719)} \\ Andrew Howroyd, Jan 23 2020
(Python)
from sympy import isprime
def aupto(limit):
alst = []
for k in range(1, limit+1):
if isprime(10**12*k + 235711131719): alst.append(k)
return alst
print(aupto(500)) # Michael S. Branicky, May 12 2021
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Parthasarathy Nambi, Mar 23 2005
EXTENSIONS
More terms from Stefan Steinerberger, Feb 15 2006
a(17) corrected by Daniel Starodubtsev, Jan 22 2020
STATUS
approved