login
A023484
a(n) = b(n) + d(n), where b(n) = (n-th Lucas number) and d(n) = (n-th non-Fibonacci number).
1
5, 9, 11, 16, 21, 29, 41, 61, 91, 139, 216, 340, 540, 863, 1386, 2230, 3595, 5803, 9375, 15154, 24504, 39632, 64109, 103713, 167793, 271476, 439239, 710683, 1149888, 1860536, 3010388, 4870887, 7881237, 12752085, 20633282, 33385326
OFFSET
0,1
LINKS
FORMULA
a(n) = A000032(n+1) + A001690(n+1). - R. J. Mathar, Feb 01 2019
MATHEMATICA
Module[{nn=40, nf}, nf=Take[Complement[Range[2nn], Fibonacci[Range[nn]]], nn]; Total/@Thread[{LucasL[Range[nn]], nf}]] (* Harvey P. Dale, Apr 26 2020 *)
CROSSREFS
Sequence in context: A314599 A292089 A314600 * A102173 A171763 A342092
KEYWORD
nonn
EXTENSIONS
a(14) onward corrected by Sean A. Irvine, Jun 04 2019
STATUS
approved