|
Search: id:A013590
|
|
|
| A013590 |
|
Orders of cyclotomic polynomials containing a coefficient >= 2. |
|
+0
3
|
|
| 105, 165, 195, 210, 255, 273, 285, 315, 330, 345, 357, 385, 390, 420, 429, 455, 495, 510, 525, 546, 555, 561, 570, 585, 595, 609, 615, 627, 630, 645, 660, 665, 690, 705, 714, 715, 735, 759, 765, 770, 777, 780, 795, 805, 819, 825, 840, 855
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
First occurrence of A137979(n)=k is given in A013594.
|
|
LINKS
|
Robert G. Wilson v, Table of n, a(n) for n = 1..1627
|
|
MATHEMATICA
|
S[ n_ ] := For[ j=1; t=0, j<n, j++, t=Cases[ CoefficientList[ Cyclotomic[ j, x ], x ], k_ /; Abs[ k ]>1 ]; If[ Length[ t ]!=0, Print[ j ] ] ]; S[ 856 ]
f[n_] := Max@ Abs@ CoefficientList[ Cyclotomic[n, x], x]; Select[ Range@ 1000, f@# > 1 &] (* Robert G. Wilson v *)
|
|
CROSSREFS
|
Cf. A137979, A013594.
Sequence in context: A115935 A069702 A133509 this_sequence A046389 A118678 A076762
Adjacent sequences: A013587 A013588 A013589 this_sequence A013591 A013592 A013593
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Peter T. Wang (peterw(AT)cco.caltech.edu)
|
|
|
Search completed in 0.002 seconds
|
