|
|
A060889
|
|
n^8-n^7+n^5-n^4+n^3-n+1.
|
|
4
|
|
|
1, 1, 151, 4561, 49981, 315121, 1406371, 4956001, 14709241, 38316961, 90090991, 195019441, 394379701, 753327121, 1370877691, 2392743361, 4027518961, 6566760001, 10409530951, 16092043921, 24323047981, 36025669681, 52386445651
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
a(n) = Phi_15(n) where Phi_k is the k-th cyclotomic polynomial.
|
|
LINKS
|
|
|
FORMULA
|
G.f.: (1-8*x+178*x^2+3154*x^3+14410*x^4+16804*x^5+5458*x^6+322*x^7+x^8)/ (1-x)^9. [Colin Barker, Apr 21 2012]
|
|
MAPLE
|
numtheory[cyclotomic](15, n) ;
end proc:
|
|
MATHEMATICA
|
Cyclotomic[15, Range[0, 30]] (* Paolo Xausa, Feb 26 2024 *)
|
|
PROG
|
(PARI) { for (n=0, 1000, write("b060889.txt", n, " ", n^8 - n^7 + n^5 - n^4 + n^3 - n + 1); ) } \\ Harry J. Smith, Jul 14 2009
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|