The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A267575 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing all changes.

A267575

Number of size 3 subsets of S_n that generate a transitive group.
(history; published version)

#8 by Joerg Arndt at Sun Jan 17 13:55:44 EST 2016

STATUS

reviewed

approved

#7 by Michel Marcus at Sun Jan 17 11:04:14 EST 2016

STATUS

proposed

reviewed

#6 by Michel Marcus at Sun Jan 17 11:04:09 EST 2016

STATUS

editing

proposed

#5 by Michel Marcus at Sun Jan 17 11:04:04 EST 2016

FORMULA

a(n) = (A220754(n) - 6*A266910 - (n-1)!)/6.

STATUS

reviewed

editing

#4 by Joerg Arndt at Sun Jan 17 09:54:03 EST 2016

STATUS

proposed

reviewed

#3 by Geoffrey Critzer at Sun Jan 17 09:32:17 EST 2016

STATUS

editing

proposed

#2 by Geoffrey Critzer at Sun Jan 17 09:27:12 EST 2016

NAME

allocated for Geoffrey CritzerNumber of size 3 subsets of S_n that generate a transitive group.

DATA

20, 1932, 269040, 60018480, 20842305120, 10739272592160, 7859814146553600, 7880871595516819200, 10509569407728543398400, 18186461035281996953126400, 39999355842324635340366182400, 109852416743246886658078908979200, 371006429409575280027759776435712000

OFFSET

3,1

FORMULA

a(n)=(A220754(n) - 6*A266910 - (n-1)!)/6

MATHEMATICA

nn = 15; b = Sum[n!^3 x^n/n!, {n, 0, nn}]; a = Sum[n!^2 x^n/n!, {n, 0,

nn}]; c = (Range[0, nn]! CoefficientList[Series[Log[a], {x, 0, nn}], x] - Table[(n - 1)!, {n, 0, nn}])/ 2; Drop[((Range[0, nn]!CoefficientList[Series[Log[b], {x, 0, nn}], x]) - 6 c - Table[(n - 1)!, {n, 0, nn}])/6, 3]

KEYWORD

allocated

nonn

AUTHOR

Geoffrey Critzer, Jan 17 2016

STATUS

approved

editing

#1 by Geoffrey Critzer at Sun Jan 17 09:27:12 EST 2016

NAME

allocated for Geoffrey Critzer

KEYWORD

allocated

STATUS

approved