A262638 Base-10 representation of the primes at A262637.

2, 59, 16319, 261887, 4193279, 335527921, 108447661849, 4672099717159297, 4398209237750224927, 17990359701977183946703, 1799003029749921411529973, 5066896351045516069934415169, 4834760092472588512731587662879, 16859870882498008730755778659813363

Offset: 1

Author

Clark Kimberling, Oct 24 2015

Keywords

• nonn
• easy
• base

Examples

			n   A262637(n)    base-10 representation
1    2                  2
2    323                59
3    3332333            16319
		

Links

• Clark Kimberling, Table of n, a(n) for n = 1..300

Crossrefs

Cf. A262637.

Programs

Mathematica

s = {2}; base = 4; z = 20; Do[NestWhile[# + 1 &, 1, ! PrimeQ[tmp = FromDigits[Join[#, IntegerDigits[Last[s]], Reverse[#]] &[IntegerDigits[#, base]], base]] &];
AppendTo[s, FromDigits[IntegerDigits[tmp, base]]], {z}]; s  (* A262637 *)
Map[FromDigits[ToString[#], base] &, s]  (* A262638 *)
(* Peter J. C. Moses, Sep 01 2015 *)