A251754 Digital root of A027444(n) = n + n^2 + n^3, n>=1. Repeat(3, 5, 3, 3, 2, 6, 3, 8, 9).
3, 5, 3, 3, 2, 6, 3, 8, 9, 3, 5, 3, 3, 2, 6, 3, 8, 9, 3, 5, 3, 3, 2, 6, 3, 8, 9, 3, 5, 3, 3, 2, 6, 3, 8, 9, 3, 5, 3, 3, 2, 6, 3, 8, 9, 3, 5, 3, 3, 2, 6, 3, 8, 9, 3, 5, 3, 3, 2, 6, 3, 8, 9, 3, 5, 3, 3, 2, 6, 3, 8, 9, 3, 5, 3, 3, 2, 6, 3, 8, 9, 3, 5, 3, 3, 2, 6, 3, 8, 9, 3, 5, 3, 3, 2, 6, 3, 8, 9, 3
Offset: 1
Examples
For a(11) = 5 because 11+11^2+11^3 = 1463, and 1+4+6+3 = 14. Result is 5, which is the digital root of 14.
Links
- Eric Weisstein's World of Mathematics, Digital Root.
- Index entries for linear recurrences with constant coefficients, signature (0, 0, 0, 0, 0, 0, 0, 0, 1).
Programs
-
Magma
&cat [[3,5,3,3,2,6,3,8,9]^^10]; // Vincenzo Librandi, Jul 18 2016
-
Mathematica
PadRight[{}, 120, {3, 5, 3, 3, 2, 6, 3, 8, 9}] (* Vincenzo Librandi, Jul 18 2016 *)
Formula
Extensions
Edited: name specified, digital root link added, a comment rewritten and moved to formula section. - Wolfdieter Lang, Jan 05 2015
Comments