OFFSET
1,1
EXAMPLE
If k=5 then k235723572357 = 5235723572357 (prime).
If k=83 then k235723572357 = 83235723572357 (prime).
MATHEMATICA
f[n_] := ToExpression[ToString[n] <> "235723572357"]; Do[If[PrimeQ[f[n]], Print[n]], {n, 1, 1000}] (* Ryan Propper, Sep 14 2005 *)
Select[Range[700], PrimeQ[# 10^12+235723572357]&] (* Harvey P. Dale, Aug 21 2021 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Parthasarathy Nambi, Aug 20 2005
EXTENSIONS
More terms from Ryan Propper, Sep 14 2005
STATUS
approved
