[go: up one dir, main page]

login
A034969
a(1) = a(2) = 1, a(n) is largest prime factor of concatenation of a(n - 2) and a(n - 1).
2
1, 1, 11, 37, 379, 37379, 130369, 463, 12277, 4210207, 1015309, 42102071015309, 7522851571, 39903394005601130021, 747580650949733, 2601211879473948668292638737, 16287160151410310678021523908384898241043, 37391601140774556436246253
OFFSET
1,3
LINKS
EXAMPLE
a(6) = 37379 because the concatenation of a(4) and a(5) is 37379, a prime number.
a(7) = 130369 because the concatenation of a(5) and a(6) is 37937379 = 3 * 97 * 130369.
MATHEMATICA
nxt[{a_, b_}]:={b, FactorInteger[FromDigits[Flatten[IntegerDigits[ {a, b}]]]][[-1, 1]]}; Transpose[NestList[nxt, {1, 1}, 18]][[1]] (* Harvey P. Dale, Nov 24 2012 *)
CROSSREFS
Sequence in context: A201312 A120833 A261420 * A052432 A104269 A084014
KEYWORD
nonn,base,nice
EXTENSIONS
Corrected and extended by Harvey P. Dale, Nov 24 2012
STATUS
approved