|
| |
|
|
A283428
|
|
Starting with a(1)=3, a(2)=4, a(n)=sum of digits of a(n-1) + sum of digits of a(n-2).
|
|
1
|
|
|
|
3, 4, 7, 11, 9, 11, 11, 4, 6, 10, 7, 8, 15, 14, 11, 7, 9, 16, 16, 14, 12, 8, 11, 10, 3, 4, 7, 11, 9, 11, 11, 4, 6, 10, 7, 8, 15, 14, 11, 7, 9, 16, 16, 14, 12, 8, 11, 10, 3, 4, 7, 11, 9, 11, 11, 4, 6, 10, 7, 8, 15, 14, 11, 7, 9, 16, 16, 14, 12, 8, 11, 10, 3, 4
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
Digital sum analog in base 10 of the Lucas numbers A000032 (starting at 3).
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).
|
|
|
MATHEMATICA
|
nxt[{a_, b_}]:={b, Total[Flatten[IntegerDigits/@{a, b}]]}; NestList[nxt, {3, 4}, 80][[;; , 1]] (* or *) PadRight[{}, 80, {3, 4, 7, 11, 9, 11, 11, 4, 6, 10, 7, 8, 15, 14, 11, 7, 9, 16, 16, 14, 12, 8, 11, 10}] (* Harvey P. Dale, Jun 14 2023 *)
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
nonn,base
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
|
