|
Search: id:A104312
|
|
|
| A104312 |
|
Prime coefficient of x^n in (x^3+x^2+x+1)^n for n in A104311. |
|
+0
3
|
|
| 3, 31, 101, 3823, 2266366724843687556556015073508073201681
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
a(6), which corresponds to n=649, is too large to include.
|
|
MATHEMATICA
|
f=1; Do[f=Expand[f*(x^3+x^2+x+1)]; s=Coefficient[f, x, n]; If[PrimeQ[s], Print[{n, s}]], {n, 1000}]
|
|
CROSSREFS
|
Cf. A005725 (quadrinomial coefficients), A104314 (nontrivial prime pentanomial coefficients).
Sequence in context: A137185 A152417 A077547 this_sequence A107197 A096060 A119682
Adjacent sequences: A104309 A104310 A104311 this_sequence A104313 A104314 A104315
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
T. D. Noe (noe(AT)sspectra.com), Mar 01 2005
|
|
|
Search completed in 0.002 seconds
|
