login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A258740 Lucas numbers whose sum of decimal digits is greater than its index. 1
3, 4, 7, 18, 29, 47, 76, 199, 843, 5778, 9349, 24476, 64079, 167761, 1860498, 4870847, 7881196, 599074578, 1568397607, 6643838879, 817138163596, 2139295485799, 14662949395604, 38388099893011, 688846502588399, 7639424778862807, 12360848946698171 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

This sequence is probably finite. The last term appears to be a(228) = L(6903) = 4382...4004 (see A258938).

LINKS

Table of n, a(n) for n=1..27.

EXAMPLE

29 is in the sequence because L(7) = A000032(7) = 29 and 2 + 9 = 11 > 7.

MATHEMATICA

LucasL[#]&/@Select[Range[100], Total[IntegerDigits[LucasL[#]]] > # &]

With[{nn=100}, Select[Thread[{LucasL[Range[nn]], Range[nn]}], Total[ IntegerDigits[ #[[1]]]]>#[[2]]&]][[All, 1]] (* Harvey P. Dale, Nov 07 2017 *)

PROG

(PARI) lista(nn) = {for(n=1, nn, if (sumdigits(l = fibonacci(n+1) + fibonacci(n-1)) > n, print1(l, ", "))); } \\ Michel Marcus, Nov 07 2015

CROSSREFS

Cf. A000032, A068498, A258938.

Sequence in context: A042375 A153067 A041593 * A109749 A307738 A041497

Adjacent sequences:  A258737 A258738 A258739 * A258741 A258742 A258743

KEYWORD

nonn,base

AUTHOR

Michel Lagneau, Nov 06 2015

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified August 4 21:32 EDT 2021. Contains 346455 sequences. (Running on oeis4.)