Advanced Search

Question: How to compile statistics each number in a sequence cannot occur over twice

Question:How to compile statistics each number in a sequence cannot occur over twice

k20057 5 15 Maple 17
August 23 2014
1

RandomCompositions:= proc(n::posint, k::posint)
local
C,
Compositions:= [seq(C-~1, C= combinat:-composition(n+k, k))],
Rand:= rand(1..nops(Compositions))
;
()-> Compositions[Rand()]
end proc:

R:= RandomCompositions(9,6):
n:= 2^13:
S:= 'R()' $ n:

 

I want to compile statistics each number in a sequence cannot  occur  over twice.

The sequences that do not fit the rule above must be ommitted.

The statistic is  Fermi-Dirac statistics.

I confused the Bose-Einstein condensation and Fermi-Dirac statistics.

But the theory is right.
Please Wait...