login
This site is supported by donations to The OEIS Foundation.
Logo

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A023501 a(n) = b(n) + d(n), where b(n) = (n-th Lucas number > 1) and d(n) = (n-th number that is 1, 2, or 3, or is not a Lucas number). 0
4, 6, 10, 16, 24, 37, 56, 86, 135, 212, 336, 536, 859, 1381, 2226, 3591, 5799, 9371, 15150, 24500, 39628, 64105, 103709, 167789, 271473, 439235, 710679, 1149884, 1860532, 3010384, 4870883, 7881233, 12752081, 20633278, 33385322 (list; graph; refs; listen; history; internal format)
OFFSET

0,1

MATHEMATICA

nn=40; Total/@Partition[With[{luc=Rest[LucasL[Range[nn]]]}, Riffle[ luc, Insert[ Complement[ Range[nn+Count[luc, _?(#<nn&)]], luc], 3, 3]]], 2] (* From Harvey P. Dale, Jul 12 2011 *)

CROSSREFS

Sequence in context: A102768 A075637 A027689 * A050887 A078642 A032416

Adjacent sequences:  A023498 A023499 A023500 * A023502 A023503 A023504

KEYWORD

nonn

AUTHOR

Clark Kimberling (ck6(AT)evansville.edu)

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified February 17 15:52 EST 2012. Contains 206050 sequences.