%I #16 Dec 14 2014 06:15:09
%S 213562373,488016887,688724209,807856967,718753769,376948073,
%T 501384623,470109559,609552329,292304843,260362799,396546331,
%U 523950547,877599617,172983557,220337531,570113543,160386899,603868999,782306849,684929369,861249497,124949771
%N Primes from merging of 9 successive digits in decimal expansion of sqrt(2).
%C Leading zeros are not permitted, so each term is 9 digits in length.
%H Vincenzo Librandi, <a href="/A198169/b198169.txt">Table of n, a(n) for n = 1..1000</a>
%t With[{len=9},Select[FromDigits/@Partition[RealDigits[Sqrt[2],10,1000][[1]],len,1],IntegerLength[#]==len&&PrimeQ[#]&]]
%Y 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, A198168, A198170, A198171, A198172, A198173, A198174, A198175, A104851, A198177.
%K nonn,base
%O 1,1
%A _Harvey P. Dale_, Oct 21 2011
|