[go: up one dir, main page]

login
Revision History for A158345 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing all changes.
The number of pairs of independent outcomes when rolling an n-sided die. Or in other words, the number of pairs of proper subsets A,B of a set S, such that #A/#S * #B/#S = #(A \intersect B)/#S.
(history; published version)
#7 by Joerg Arndt at Sat Apr 29 07:01:56 EDT 2023
STATUS

reviewed

approved

#6 by Jon E. Schoenfield at Sat Apr 29 03:17:35 EDT 2023
STATUS

proposed

reviewed

#5 by Michel Marcus at Sat Apr 29 02:55:42 EDT 2023
STATUS

editing

proposed

#4 by Michel Marcus at Sat Apr 29 02:55:39 EDT 2023
NAME

The number of pairs of independent outcomes when rolling an n-sided die. Or in other terms, words, the number of pairs of proper subsets A,B of a set S, such that #A/#S * #B/#S = #(A \intersect B)/#S.

STATUS

approved

editing

#3 by Charles R Greathouse IV at Thu Oct 25 11:42:30 EDT 2012
STATUS

editing

approved

#2 by Charles R Greathouse IV at Thu Oct 25 11:42:28 EDT 2012
MATHEMATICA

Sum[Total[s!/(c!(#-c)!(s c/#-c)!(s - # - s c/# + c)!) &/@Select[Divisors[s c], c <= # <= s &]], {c, 1, s}] - <a href="http://www.ocf.berkeley.edu/~wwu/cgi-bin/yabb/YaBB.cgi?board=riddles_cs; action=display; num=1234635667#3(* ">Eigenray</a>, ", see link, Feb 15th 2009 *)

STATUS

approved

editing

#1 by N. J. A. Sloane at Tue Jun 01 03:00:00 EDT 2010
NAME

The number of pairs of independent outcomes when rolling an n-sided die. Or in other terms, the number of pairs of proper subsets A,B of a set S, such that #A/#S * #B/#S = #(A \intersect B)/#S.

DATA

1, 5, 13, 53, 61, 845, 253, 7509, 16141, 128045, 4093, 1785965, 16381, 23576285, 55921333, 274696789, 262141, 5338300157, 1048573, 63028146573, 117924207421, 995274180125, 16777213, 15265519672173, 14283159085861

OFFSET

1,2

LINKS

<a href="http://www.ocf.berkeley.edu/~wwu/cgi-bin/yabb/YaBB.cgi?board=riddles_cs;action=display;num=1234635667">wwu riddle forum thread on the problem</a>

EXAMPLE

For N=4 we have 53 solutions, because {1,2,3,4} together with any proper subset yields 2*15-1 = 29 valid pairs, and a further 24 pairs can be obtained from {1,2} & {1,3}, by substituting the numbers with any permutation of (1,2,3,4).

MATHEMATICA

Sum[Total[s!/(c!(#-c)!(s c/#-c)!(s - # - s c/# + c)!) &/@Select[Divisors[s c], c <= # <= s &]], {c, 1, s}] - <a href="http://www.ocf.berkeley.edu/~wwu/cgi-bin/yabb/YaBB.cgi?board=riddles_cs; action=display; num=1234635667#3">Eigenray</a>, Feb 15th 2009

KEYWORD

nonn

AUTHOR

Harmen Wassenaar (towr(AT)ai.rug.nl), Mar 16 2009

STATUS

approved