[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A262642
Base-10 representation of 1 and the primes at A262641.
3
1, 31, 2659, 28921, 20254277, 222258347161, 6703502508238897, 2849796577598550571, 163260594826469315359, 78587320839900014133983, 63082726980138277941240209, 28861909227691304085982177103, 17774573388934687063056536849453
OFFSET
1,2
LINKS
EXAMPLE
n A262641(n) base-10 representation
1 1 1
2 111 31
3 41114 2659
MATHEMATICA
s = {3}; 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 (* A262639 *)
Map[FromDigits[ToString[#], base] &, s] (* A262640 *)
(* Peter J. C. Moses, Sep 01 2015 *)
CROSSREFS
Cf. A262641.
Sequence in context: A062987 A302137 A136245 * A273983 A173563 A190527
KEYWORD
nonn,easy,base
AUTHOR
Clark Kimberling, Oct 24 2015
STATUS
approved