This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A198170 #14 Dec 14 2014 06:20:26 %S A198170 653,643,433,383,419,197,971,937,751,307,421,211,821,823,647,709,223, %T A198170 317,359,811,701,193,521,211,229,881,109,659,593,461,823,233,337,271, %U A198170 821,607,491,127,587,631,881,881,829,409,643,367,113,521,941,151,433,727 %N A198170 Primes from merging of 3 successive digits in decimal expansion of Pi. %C A198170 Leading zeros are not permitted, so each term is 3 digits in length. %H A198170 Vincenzo Librandi, <a href="/A198170/b198170.txt">Table of n, a(n) for n = 1..1000</a> %t A198170 Select[FromDigits/@Partition[RealDigits[Pi,10,1000][[1]],3,1], IntegerLength[#]==3&&PrimeQ[#]&] %Y A198170 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, A198169, A198171, A198172, A198173, A198174, A198175, A104851, A198177. %K A198170 nonn,base %O A198170 1,1 %A A198170 _Harvey P. Dale_, Oct 21 2011