OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
If k=8, then k3333333 = 83333333 (prime).
If k=71, then k3333333 = 713333333 (prime).
If k=103, then k3333333 = 1033333333 (prime).
MATHEMATICA
Select[Range[500], PrimeQ[# 10^7+3333333]&] (* Harvey P. Dale, Aug 28 2019 *)
PROG
(Magma) [ n: n in [1..700] | IsPrime(Seqint([3, 3, 3, 3, 3, 3, 3] cat Intseq(n))) ]; // Vincenzo Librandi, Feb 03 2011
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Parthasarathy Nambi, Feb 25 2005
STATUS
approved