OFFSET
4,2
REFERENCES
J. Earls & J. Rogers, 0.1361015212836455566..., Lulu Press, NY, 2006, p. 22.
LINKS
MATHEMATICA
lpk[n_]:=Module[{k=1, c=10^n, p=Prime[n]}, While[!PrimeQ[k*c+p], k++]; k]; Array[ lpk, 80, 4] (* Harvey P. Dale, Sep 01 2020 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jason Earls, Aug 03 2006
STATUS
approved