Solution to Project Euler Problem 54 : is_three(c) - File Exchange

Code covered by the BSD License

Highlights from
Solution to Project Euler Problem 54

euler54
findv(c)
get_fourv(C)
get_fullhv(c)
get_onepv(c)
get_threev(c)
get_twopv(c)
geth(c)
getrank(C)
is_flush(c)
is_four(C) * the second output of unique() can be thought of as the last position of the
is_fullh(C)
is_onep(c)
is_royalf(c)
is_sflush(c)
is_straight(c)
is_three(c)
is_twop(c)
View all files

from Solution to Project Euler Problem 54 by Husam Aldahiyat
How many hands did player one win in the game of poker?

is_three(c)

function b = is_three(c)
	% is hand a three of a kind?
	
	cn = findv(c);
	
	b = 0;
	
	% loop through each of the first three hand card values
	for k = 1:3
		
		% if one of them is repeated three times
		if sum(ismember(cn,cn(k))) == 3
			
			b = 1;
			
			return
			
		end
		
	end
	
end

Highlights from Solution to Project Euler Problem 54

Highlights from
Solution to Project Euler Problem 54