
2, 1, 3, 4, 7, 2, 9, 11, 11, 13, 6, 19, 7, 8, 15, 14, 11, 16, 27, 25, 16, 23, 21, 26, 20, 28, 21, 22, 25, 29, 36, 20, 38, 40, 24, 28, 34, 26, 33, 23, 38, 34, 54, 43, 52, 41, 30, 62, 47, 46, 39, 49, 43, 47, 45, 47, 47, 58, 33, 73, 43, 53, 33, 68, 56, 70, 45, 43
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,1


LINKS

Irene Sermon, Table of n, a(n) for n = 0..10000


FORMULA

a(n) = A007953(A000032(n)).  Michel Marcus, Jul 13 2015


EXAMPLE

15127 is the 20th Lucas number (A000032(20)) with digit sum 16, so a(20)=16.


MATHEMATICA

Table[Total[IntegerDigits[LucasL[n]]], {n, 0, 100}] (* T. D. Noe, Oct 28 2013 *)


PROG

(MAGMA) [&+Intseq(Lucas(n)): n in [0..80]]; // Vincenzo Librandi, Jul 13 2015


CROSSREFS

Cf. A000032, A004090, A007953.
Sequence in context: A060214 A259773 A030133 * A111958 A192439 A160187
Adjacent sequences: A139371 A139372 A139373 * A139375 A139376 A139377


KEYWORD

nonn,base


AUTHOR

Parthasarathy Nambi, Jun 08 2008


STATUS

approved

