Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'combinatorics' topicStudent Support Forum > General > "combinatorics"

< Previous Comment | Next Comment >Help | Reply To Comment | Reply To Topic
Author Comment/Response
Bill Simpson
11/15/12 12:33pm

In[1]:= dice=Map[IntegerDigits[#,6,5]+1&,Range[0,6^5-1]];
Count[dice,{x_,x_,x_,y_,z_}/;x≠y&&x≠z&&y≠z]

Out[3]= 120

In[4]:= Count[dice,{x_,x_,y_,y_,y_}/;x≠y]

Out[4]= 30

URL: ,

Subject (listing for 'combinatorics')
Author Date Posted
combinatorics Max 11/14/12 12:59pm
Re: combinatorics Bill Simpson 11/15/12 12:33pm
Re: combinatorics yehuda 11/15/12 2:06pm
Re: combinatorics Michael 11/15/12 8:01pm
Re: combinatorics yehuda 11/18/12 12:44pm
< Previous Comment | Next Comment >Help | Reply To Comment | Reply To Topic