|
|
A109292
|
|
Numbers k such that the string k235723572357 is prime.
|
|
0
|
|
|
5, 8, 44, 82, 83, 118, 157, 160, 163, 176, 179, 197, 199, 206, 229, 239, 242, 250, 251, 269, 293, 298, 304, 307, 331, 335, 337, 346, 358, 373, 388, 412, 422, 461, 478, 479, 485, 499, 500, 505, 527, 554, 557, 565, 566, 569, 590, 619, 632, 643, 646, 649, 656
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
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
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|