OFFSET
1,1
COMMENTS
Leading zeros are not permitted, so each term is 8 digits in length.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
With[{len=8}, Select[FromDigits/@Partition[RealDigits[Sqrt[2], 10, 1000][[1]], len, 1], IntegerLength[#]==len&&PrimeQ[#]&]]
CROSSREFS
Cf. A103773, A103789, A103793, A103808, A103809, A103810, A103811, A103812, A104824, A104825, A104826, A104843, A104844, A104845, A104846, A104847, A104848, A104849, A104850, A198161, A198162, A198163, A198164, A198165, A198166, A198167, A198169, A198170, A198171, A198172, A198173, A198174, A198175, A104851, A198177
KEYWORD
nonn,base
AUTHOR
Harvey P. Dale, Oct 21 2011
STATUS
approved