This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A104311 #8 Oct 04 2024 23:09:12 %S A104311 2,4,5,8,73,649 %N A104311 Numbers n such that the coefficient of x^n in (x^3+x^2+x+1)^n is prime. %C A104311 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. %C A104311 Any further terms are > 500000. - _Lucas A. Brown_, Oct 04 2024 %t A104311 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}] %Y A104311 Cf. A005725 (quadrinomial coefficients). %K A104311 more,nonn,hard %O A104311 1,1 %A A104311 _T. D. Noe_, Mar 01 2005