cp's OEIS Frontend

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.

A057740 Irregular triangle read by rows: T(n,k) is the number of elements of alternating group A_n having order k, for n >= 1, 1 <= k <= A051593(n).

Original entry on oeis.org

1, 1, 1, 0, 2, 1, 3, 8, 1, 15, 20, 0, 24, 1, 45, 80, 90, 144, 1, 105, 350, 630, 504, 210, 720, 1, 315, 1232, 3780, 1344, 5040, 5760, 0, 0, 0, 0, 0, 0, 0, 2688, 1, 1323, 5768, 18900, 3024, 37800, 25920, 0, 40320, 9072, 0, 15120, 0, 0, 24192
Offset: 1

Views

Author

Roger Cuculière, Oct 29 2000

Keywords

Examples

			Triangle begins:
  1;
  1;
  1,    0,    2;
  1,    3,    8;
  1,   15,   20,     0,   24;
  1,   45,   80,    90,  144;
  1,  105,  350,   630,  504,   210,   720;
  1,  315, 1232,  3780, 1344,  5040,  5760, 0,     0,    0, 0,     0, 0, 0,  2688;
  1, 1323, 5768, 18900, 3024, 37800, 25920, 0, 40320, 9072, 0, 15120, 0, 0, 24192;
...
		

References

  • J. H. Conway, R. T. Curtis, S. P. Norton, R. A. Parker and R. A. Wilson, ATLAS of Finite Groups. Oxford Univ. Press, 1985 [for best online version see https://oeis.org/wiki/Welcome#Links_to_Other_Sites].

Crossrefs

Programs

  • Magma
    {* Order(g) : g in Alt(6) *};
  • Mathematica
    row[n_] := (orders = PermutationOrder /@ GroupElements[AlternatingGroup[n] ]; Table[Count[orders, k], {k, 1, Max[orders]}]); Table[row[n], {n, 1, 9}] // Flatten (* Jean-François Alcover, Aug 31 2016 *)

Extensions

More terms from N. J. A. Sloane, Nov 01 2000
Missing zero in the row for A_9 inserted by N. J. A. Sloane, Mar 27 2015