Question: Find repetitions in a list

I have to generate a random list of 30 elements and i have two variables: s, which is a counter for all the list which have got at least a repetition and variable n, for each list who has not repeated values, as in the code below.

I don't understand why, when i sum s and m i get a value which is not 100, why?

for i by 1 to 100 do
		list:=RandomTools[Generate](list(integer(range = 1 .. 365), 30));
		if numelems(FindRepetitions(lista)) >= 1 then
			s:=s+1;
		
		else		n:=n+1;
				
				end if;
				end do;

 

Please Wait...