($n,$k)=glob<>;
while($n>1){
	if($n==4||$n&1){
		$n-=3;
	}else{
		$n>>=1;
	}
	--$k;
}
print $n&&$k>=0 ? YES : NO;