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 A262628 #7 Oct 17 2015 16:45:19 %S A262628 0,5,1619,22861,5608661,123097943,2103004511,411605194237, %T A262628 29681120620523,8356197277826743,141511180168198879, %U A262628 23016765965614427641,30251327028834944270131,371385619022538141977254297,124784413675757116661951994259 %N A262628 Base-10 representation of 0 and the primes at A262627. %H A262628 Clark Kimberling, <a href="/A262628/b262628.txt">Table of n, a(n) for n = 1..300</a> %e A262628 n A262627(n) base-10 representation %e A262628 1 0 0 %e A262628 2 101 5 %e A262628 3 11001010011 1619 %t A262628 s = {0}; base = 2; z = 20; Do[NestWhile[# + 1 &, 1, ! PrimeQ[tmp = FromDigits[Join[#, IntegerDigits[Last[s]], Reverse[#]] &[IntegerDigits[#, base]], base]] &]; %t A262628 AppendTo[s, FromDigits[IntegerDigits[tmp, base]]], {z}]; s (* A262627 *) %t A262628 Map[FromDigits[ToString[#], base] &, s] (* A262628 *) %t A262628 (* _Peter J. C. Moses_, Sep 01 2015 *) %Y A262628 Cf. A262627. Subsequence of A016041 (except a(1)). %K A262628 nonn,base %O A262628 1,2 %A A262628 _Clark Kimberling_, Oct 02 2015