login
A262638
Base-10 representation of the primes at A262637.
3
2, 59, 16319, 261887, 4193279, 335527921, 108447661849, 4672099717159297, 4398209237750224927, 17990359701977183946703, 1799003029749921411529973, 5066896351045516069934415169, 4834760092472588512731587662879, 16859870882498008730755778659813363
OFFSET
1,1
LINKS
EXAMPLE
n A262637(n) base-10 representation
1 2 2
2 323 59
3 3332333 16319
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 *)
CROSSREFS
Cf. A262637.
Sequence in context: A139190 A050283 A096758 * A202622 A113549 A268432
KEYWORD
nonn,easy,base
AUTHOR
Clark Kimberling, Oct 24 2015
STATUS
approved