A249910 Digital root of A003500(n).
2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4, 2, 4, 5, 7, 5, 4
Offset: 0
Links
- Index entries for linear recurrences with constant coefficients, signature (1, 0, -1, 1).
Programs
-
Mathematica
LinearRecurrence[{1, 0, -1, 1}, {2, 4, 5, 7}, 102] (* Ray Chandler, Jul 25 2016*)
Formula
a(n) = 4*a(n-1) - a(n-2), reduced to digital root.
a(n) = digital root of (2 + sqrt(3))^n + ( 2 - sqrt(3))^n.
Extensions
More terms from Ray Chandler, Jul 25 2016
Comments