|
| |
|
|
A127877
|
|
Integers of the form (x^4)/24+(x^3)/6+(x^2)/2+x+1.
|
|
6
| |
|
|
7, 115, 297, 1237, 2171, 5527, 8221, 16441, 22335, 38731, 49697, 78445, 96787, 142927, 171381, 240817, 282551, 382051, 440665, 577861, 657387, 840775, 945677, 1184617, 1319791, 1624507, 1795281, 2176861, 2388995, 2859391, 3119077
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Generating polynomial is Schur's polynomial of 4-degree. Schur's polynomials n degree are n-th first term of series expansion of e^x function. All polynomials are non-reducible and belonging to the An alternating Galois transitive group if n is divisible by 4 or to Sn symmetric Galois Group in other case (proof Schur, 1930).
|
|
|
MATHEMATICA
| a = {}; Do[If[IntegerQ[1 + x + x^2/2 + x^3/6 + x^4/24], AppendTo[a, 1 + x + x^2/2 + x^3/6 + x^4/24]], {x, 1, 100}]; a
|
|
|
CROSSREFS
| Cf. A127873, A127874, A127875, A127876, A127878, A127879, A127880, A127881, A127882, A127883, A127884.
Sequence in context: A086788 A199672 A183403 * A082487 A081798 A063399
Adjacent sequences: A127874 A127875 A127876 * A127878 A127879 A127880
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Artur Jasinski (grafix(AT)csl.pl), Feb 04 2007
|
| |
|
|