Displaying 1 result from an estimated 1 matches for "cl_class_ids".
2011 May 10
0
Join and Meet on Lattice
...culty
# delta shows the difference between number of urns. delta=0 shows that urns are
the same in both cases.
#
urn <- function(n,k,delta){
# trivial partitions or power set: all elements are in one partition. i.e. (1 1
1 1 1 ) for n = 5
trivial <- as.numeric(cbind(rep(1,n)))
t <- as.cl_class_ids(trivial)
# write Trivial in the matrice form (hard partition)
# set counter and number of rounds.
counter <- 0
rounds <- 10
for(i in 1:rounds){
x<- as.numeric(cbind(sample.int( k , n , replace = TRUE, prob = NULL)))
y<- as.numeric(cbind(sample.int( k + delta , n , replace = T...