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 A262650 #4 Oct 31 2015 15:02:52 %S A262650 2,197,69313,8813963,84621544849,527772818401391,6822795350471323, %T A262650 27886178439493066223,31708613496145827870113, %U A262650 43587702672242054520081077,13602652894439672099923526011,22768853068939384975328656897381,715213262078891560583355909701176813 %N A262650 Base-10 representation of the primes at A262649. %H A262650 Clark Kimberling, <a href="/A262650/b262650.txt">Table of n, a(n) for n = 1..300</a> %e A262650 n A262649(n) base-10 representation %e A262650 1 2 2 %e A262650 2 525 197 %e A262650 3 1252521 69313 %t A262650 s = {2}; base = 6; z = 20; Do[NestWhile[# + 1 &, 1, ! PrimeQ[tmp = FromDigits[Join[#, IntegerDigits[Last[s]], Reverse[#]] &[IntegerDigits[#, base]], base]] &]; %t A262650 AppendTo[s, FromDigits[IntegerDigits[tmp, base]]], {z}]; s (* A262649 *) %t A262650 Map[FromDigits[ToString[#], base] &, s] (* A262650 *) %t A262650 (* _Peter J. C. Moses_, Sep 01 2015 *) %Y A262650 Cf. A262649. %K A262650 nonn,easy,base %O A262650 1,1 %A A262650 _Clark Kimberling_, Oct 27 2015