A104823 - OEIS

%I #15 Dec 14 2014 02:05:29

%S 653,643,433,383,419,197,971,937,751,97,307,89,421,211,67,821,823,647,

%T 709,223,317,359,811,701,19,193,521,211,229,881,109,97,659,593,461,

%U 823,233,337,271,19,821,607,491,127

%N Primes from merging of three successive digits in decimal expansion of Pi.

%C Leading zeros are permitted, so not every term is 3 digits in length. - _Harvey P. Dale_, Oct 24 2011

%H Vincenzo Librandi, <a href="/A104823/b104823.txt">Table of n, a(n) for n = 1..1000</a>

%t With[{pi = FromDigits/@Partition[RealDigits[Pi, 10, 500][[1]], 3, 1]}, Select[pi, PrimeQ]] (* _Vincenzo Librandi_, Apr 23 2013 *)

%Y Cf. A104819-A104842.

%K nonn,base

%O 1,1

%A _Zak Seidov_, Mar 27 2005