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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A098748 Let f[n]=(n^4-n^3-1)/ (n^2-n-1); then a(n) = Floor[f[n]] 0
1, 1, 7, 10, 17, 26, 37, 50, 65, 82, 101, 122, 145, 170, 197, 226, 257, 290, 325, 362, 401, 442, 485, 530, 577, 626, 677, 730, 785, 842, 901, 962, 1025, 1090, 1157, 1226, 1297, 1370, 1445, 1522, 1601, 1682, 1765, 1850, 1937, 2026, 2117, 2210, 2305, 2402, 2501 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

LINKS

Table of n, a(n) for n=0..50.

MATHEMATICA

(* polynomial sequence with Theta1 to Fibonacci pattern*) digits=200 f[n_]=(n^4-n^3-1)/ (n^2-n-1) a=Table[Floor[f[n]], {n, 0, digits}]

CROSSREFS

Sequence in context: A299997 A299987 A192273 * A020692 A124187 A155027

Adjacent sequences:  A098745 A098746 A098747 * A098749 A098750 A098751

KEYWORD

nonn

AUTHOR

Roger L. Bagula, Oct 01 2004

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 17 11:14 EDT 2019. Contains 326057 sequences. (Running on oeis4.)