OFFSET
1,1
COMMENTS
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..997
MATHEMATICA
Table[Module[{k=1}, While[CompositeQ[10^IntegerLength[k] FromDigits[ PadRight[ {1}, n, 0]]+k], k+=2]; 10^IntegerLength[k] FromDigits[ PadRight[ {1}, n, 0]]+k], {n, 2, 20}] (* Harvey P. Dale, Aug 07 2021 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Lekraj Beedassy, Apr 25 2008
STATUS
approved