OFFSET
1,1
COMMENTS
Digital sum analog in base 10 of the Fibonacci recurrence starting with 4,5.
The sequence is periodic from n=1 with period 24.
LINKS
Index entries for linear recurrences with constant coefficients, signature (1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1).
FORMULA
a(n) = a(n-1) + a(n-2) - 9*(floor(a(n-1)/10)+floor(a(n-2)/10)).
MATHEMATICA
a[n_] := a[n] = If[n <= 2, n + 3, Total@ IntegerDigits[a[n - 1]] + Total@ IntegerDigits[a[n - 2]]]; Array[a, 84] (* Michael De Vlieger, May 22 2017 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Enrique Navarrete, May 21 2017
STATUS
approved