OFFSET
0,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..2000
FORMULA
For all n not in A016873, a(n) = n^4 + 2n^3 + 3n^2 + 2n + 2, else A099024((n-2)/5). - Ralf Stephan, Sep 25 2004
a(n) = denominator of (2*n+1)/((n^2+1)*((n+1)^2+1)). - G. C. Greubel, Oct 14 2024
MATHEMATICA
Table[Denominator[(1+2*n)/((1+n^2)*(1+(n+1)^2))], {n, 0, 40}] (* G. C. Greubel, Oct 14 2024 *)
PROG
(Magma)
A033466:= func< n | Denominator((2*n+1)/((n^2+1)*((n+1)^2+1))) >;
[A033466(n): n in [0..40]]; // G. C. Greubel, Oct 14 2024
(SageMath)
def A033466(n): return denominator((2*n+1)/((n^2+1)*((n+1)^2+1)))
[A033466(n) for n in range(41)] # G. C. Greubel, Oct 14 2024
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
STATUS
approved