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 A164125 #3 Mar 31 2012 12:38:26 %S A164125 11,10,128,22,60,524,180,156,156,180,58,180,66,90,90,66,90,6320,714, %T A164125 1008,2190,2650,1722,198,1722,41510,810,594,1620,6570,3546,5736,1620, %U A164125 1404,810,594,1620,522,4428,810,1332,1620,1404,7356,594,810,3546,2214 %N A164125 First differences of A029971. %C A164125 Differences between primes that are palindromic in base 3. %e A164125 a(4) = 22 = A029971(5)-A029971(4). %t A164125 f[n_]:=FromDigits[RealDigits[n,3][[1]]]==FromDigits[Reverse[RealDigits[n, 3][[1]]]]; a=2;lst={};Do[p=Prime[n];If[f[p],AppendTo[lst,p-a];a=p], {n,1,8!,1}];lst %Y A164125 Cf. A164124, A029971, A016041 %K A164125 nonn,base %O A164125 1,1 %A A164125 _Vladimir Joseph Stephan Orlovsky_, Aug 10 2009 %E A164125 Definition simplified, initial 0 removed by _R. J. Mathar_, Nov 17 2009