|
| |
|
|
A070520
|
|
Prime numbers of form p=Cyclotomic[n,n].
|
|
2
|
| |
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Table of n, a(n) for n=1..10.
|
|
|
MATHEMATICA
|
Do[s=Cyclotomic[n, n]; If[PrimeQ[s], Print[s]], {n, 2, 256}]; output = the prime value
Select[Table[Cyclotomic[n, n], {n, 300}], PrimeQ] (* Harvey P. Dale, Dec 06 2012 *)
|
|
|
CROSSREFS
|
Cf. A070518, A070519.
Sequence in context: A216535 A045434 A166567 * A018579 A006486 A070518
Adjacent sequences: A070517 A070518 A070519 * A070521 A070522 A070523
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), May 02 2002
|
|
|
STATUS
|
approved
|
| |
|
|
