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 A262636 #7 Oct 24 2015 11:46:02 %S A262636 1,409,88469,3499607,525755773,1889074241401,14476124563693171, %T A262636 3690382506839631667,944489835647492584243,17945058791198905978063, %U A262636 1798278215177468964031733,17136765345945336793560989047,39126270988987383599688999460333 %N A262636 Base-10 representation of 1 and the primes at A262635. %H A262636 Clark Kimberling, <a href="/A262636/b262636.txt">Table of n, a(n) for n = 1..300</a> %e A262636 n A262635(n) base-10 representation %e A262636 1 1 1 %e A262636 2 12121 409 %e A262636 3 111212111 88469 %t A262636 s = {1}; base = 4; z = 20; Do[NestWhile[# + 1 &, 1, ! PrimeQ[tmp = FromDigits[Join[#, IntegerDigits[Last[s]], Reverse[#]] &[IntegerDigits[#, base]], base]] &]; %t A262636 AppendTo[s, FromDigits[IntegerDigits[tmp, base]]], {z}]; s (* A262635 *) %t A262636 Map[FromDigits[ToString[#], base] &, s] (* A262636 *) %t A262636 (* _Peter J. C. Moses_, Sep 01 2015 *) %Y A262636 Cf. A262635. Subsequence of A029972. %K A262636 nonn,base %O A262636 1,2 %A A262636 _Clark Kimberling_, Oct 02 2015