A277625 Nontrivial values of Fibonacci polynomials.
2, 3, 5, 8, 10, 12, 13, 17, 21, 26, 29, 33, 34, 37, 50, 55, 65, 70, 72, 82, 89, 101, 109, 122, 135, 144, 145, 169, 170, 197, 226, 228, 233, 257, 290, 305, 325, 357, 360, 362, 377, 401, 408, 442, 485, 528, 530, 577, 610, 626, 677, 701, 730, 747, 785, 842, 901, 962, 985, 987
Offset: 1
Keywords
Examples
12 is in this sequence because FibonacciPolynomial(4, 2) = 12.
Links
- Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
- Wikipedia, Fibonacci polynomials.
Crossrefs
Programs
-
Mathematica
Take[Union[Flatten[Table[Fibonacci[x, y], {x, 3, 20}, {y, 50}]]], 60] (* Robert G. Wilson v, Oct 24 2016 *)
-
PARI
list(lim)=my(v=List()); for(y=1,sqrtint(lim\1-1), my(a=y,b=y^2+1); while(b<=lim, listput(v,b); [a,b]=[b,a+y*b])); Set(v) \\ Charles R Greathouse IV, Oct 30 2016
Formula
FibonacciPolynomial(x, y) with x>=3 and y>=1.
a(n) = n^2 - 2*n^(5/3) - O(n^(3/2)). - Charles R Greathouse IV, Nov 03 2016
Extensions
More terms from Robert G. Wilson v, Oct 24 2016
Comments