OFFSET
1,2
LINKS
Index entries for linear recurrences with constant coefficients, signature (3, -2, -2, 3, -1).
FORMULA
a(n)=floor(1/{(8+n^4)^(1/4)}), where {}=fractional part.
It appears that a(n)=3a(n-1)-2a(n-2)-2a(n-3)+3a(n-4)-a(n-5) for n>=7.
MATHEMATICA
p[n_]:=FractionalPart[(n^4+8)^(1/4)];
q[n_]:=Floor[1/p[n]];
Table[q[n], {n, 1, 80}]
FindLinearRecurrence[Table[q[n], {n, 1, 1000}]]
Join[{1}, LinearRecurrence[{3, -2, -2, 3, -1}, {4, 13, 32, 62, 108}, 59]] (* Ray Chandler, Aug 02 2015 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jan 18 2011
STATUS
approved