%I A127876
%S A127876 13,61,172,373,691,1153,1786,2617,3673,4981,6568,8461,10687,13273,16246,
%T A127876 19633,23461,27757,32548,37861,43723,50161,57202,64873,73201,82213,
%U A127876 91936,102397,113623,125641,138478,152161,166717,182173,198556,215893
%N A127876 Integers of the form (x^3)/6+(x^2)/2+x+1.
%C A127876 Generating polynomial is Schur's polynomial of degree 3. 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).
%t A127876 a = {}; Do[If[IntegerQ[1 +x + x^2/2 + x^3/6], AppendTo[a, 1 + x + x^2/
2 + x^3/6]], {x, 1, 300}]; a
%Y A127876 Cf. A127873, A127874, A127875.
%Y A127876 Sequence in context: A119151 A081589 A139880 this_sequence A047673 A141725
A147185
%Y A127876 Adjacent sequences: A127873 A127874 A127875 this_sequence A127877 A127878
A127879
%K A127876 nonn
%O A127876 1,1
%A A127876 Artur Jasinski (grafix(AT)csl.pl), Feb 04 2007
|