Solution to Project Euler Problem 54 : get_onepv(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?

get_onepv(c)

function v = get_onepv(c)
	% get value of one pair hand
	
	cn = findv(c);
	
	a = unique(cn);
	
	% loop through cards
	for k = 1:4
		
		% see which card is repeated
		if sum(ismember(cn,a(k))) == 2
			
			% hand value is said card value
			v = a(k);
			
		end
		
	end	
	
end

Highlights from Solution to Project Euler Problem 54

Highlights from
Solution to Project Euler Problem 54