|
|
A280532
|
|
a(1) = a(2) = 1, a(n) = A014777(a(n-1) + a(n-2)), n >= 3.
|
|
1
|
|
|
1, 1, 6, 13, 37, 31, 605, 1411, 7174, 15567, 608953, 78903, 334535, 611552, 105928, 2557047, 2979162, 3263358, 6242520, 7825254, 37404834, 267494881, 639174488
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
MATHEMATICA
|
Module[{a = {1, 1}, s = First@ RealDigits[N[Pi, 10^7]]}, Do[AppendTo[a, -1 + SequencePosition[s, IntegerDigits[ a[[n - 1]] + a[[n - 2]] ]][[1, 1]]], {n, 3, 20}]; a] (* Michael De Vlieger, Jan 14 2017 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|