|
| |
|
|
A066982
|
|
Lucas(n+1) - (n+1).
|
|
3
| |
|
|
1, 1, 3, 6, 12, 22, 39, 67, 113, 188, 310, 508, 829, 1349, 2191, 3554, 5760, 9330, 15107, 24455, 39581, 64056, 103658, 167736, 271417, 439177, 710619, 1149822, 1860468, 3010318, 4870815, 7881163, 12752009, 20633204, 33385246, 54018484, 87403765, 141422285
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=1,...,250
|
|
|
FORMULA
| a(1) = a(2) = 1, a(n + 2) = a(n + 1) + a(n) + n.
For n>2, a(n) = floor( PHI^(n+1)-(n+1)) + (1-(-1)^n)/2
|
|
|
MATHEMATICA
| a[1] = a[2] = 1; a[n_] := a[n] = a[n - 1] + a[n - 2] + n - 2; Table[a[n], {n, 40}]
LinearRecurrence[{3, -2, -1, 1}, {1, 1, 3, 6}, 60] (* From Vladimir Joseph Stephan Orlovsky, Feb 13 2012 *)
|
|
|
PROG
| (PARI) { for (n=1, 250, if (n>2, a=a1 + a2 + n - 2; a2=a1; a1=a, a=a1=1; a=a2=1); write("b066982.txt", n, " ", a) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Apr 14 2010]
|
|
|
CROSSREFS
| Sequence in context: A062483 A174013 A081056 * A179906 A018078 A005404
Adjacent sequences: A066979 A066980 A066981 * A066983 A066984 A066985
|
|
|
KEYWORD
| nonn,changed
|
|
|
AUTHOR
| Benoit Cloitre (benoit7848c(AT)orange.fr), Jan 27 2002
|
|
|
EXTENSIONS
| Corrected and extended by Harvey P. Dale (hpd1(AT)nyu.edu), Feb 08 2002
|
| |
|
|
