|
|
A104311
|
|
Numbers n such that the coefficient of x^n in (x^3+x^2+x+1)^n is prime.
|
|
1
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
n such that A005725(n) is prime. No other n<16000. The primes are in A104312. Only coefficients of the x, x^n, x^(2n) and x^(3n-1) terms can be prime; the coefficients of x and x^(3n-1) terms are prime whenever n is prime.
|
|
LINKS
|
|
|
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).
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|