|
| |
|
|
A147997
|
|
Number of even numbers, including 0, <= Fibonacci(n).
|
|
0
| |
|
|
1, 1, 1, 2, 2, 3, 5, 7, 11, 18, 28, 45, 73, 117, 189, 306, 494, 799, 1293, 2091, 3383, 5474, 8856, 14329, 23185, 37513, 60697, 98210, 158906, 257115, 416021, 673135, 1089155, 1762290, 2851444, 4613733, 7465177, 12078909
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,4
|
|
|
FORMULA
| a(n) = 1+floor( A000045(n)/2) = 1+A004695(n). [R. J. Mathar, Jan 30 2010]
|
|
|
MATHEMATICA
| Table[f=Fibonacci[n]; If[EvenQ[f], f = f/2, f = (f-1)/2]; f+1, {n, 0, 100}] (*From Vladimir Joseph Stephan Orlovsky (4vladimir(AT)gmail.com), 22 Nov 2010*)
|
|
|
CROSSREFS
| Cf. A000045
Sequence in context: A077419 A125189 A196375 * A118987 A060699 A062724
Adjacent sequences: A147994 A147995 A147996 * A147998 A147999 A148000
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Giovanni Teofilatto (g.teofilatto(AT)tiscalinet.it), Nov 19 2008
|
|
|
EXTENSIONS
| Definition and offset corrected by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jan 30 2010
|
| |
|
|
