OFFSET
1,3
COMMENTS
Also numbers n such that (32*10^n+13)/9 is prime.
a(17) > 10^5. - Robert Price, Apr 07 2015
LINKS
FORMULA
a(n) = A101837(n-1) + 1.
MATHEMATICA
Do[ If[ PrimeQ[(32*10^n+13)/9], Print[n]], {n, 0, 10000}]
Select[Range[0, 10000], PrimeQ[(32 10^# + 13) / 9 ] &] (* Vincenzo Librandi, Apr 08 2015 *)
PROG
(Magma) [n: n in [0..200] | IsPrime((32*10^n+13) div 9)]; // Vincenzo Librandi, Apr 08 2015
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Robert G. Wilson v, Dec 17 2004
EXTENSIONS
Addition of a(12)-a(14) from Kamada data by Robert Price, Dec 13 2010
a(15) from Erik Branger May 01 2013 by Ray Chandler, Aug 16 2013
a(16) from Robert Price, Apr 07 2015
STATUS
approved