function ShowGene(X,Z,itr,ival,i)

if (length(ival)==0) 
	ShowGene(X,Z,i)
	return
end

[N,n]=size(X); 
a=1:n; 
scatter(a(Z==0),X(i,Z==0),'b'); hold on
scatter(a(Z==1),X(i,Z==1),'r')
scatter(ival,X(i,ival),'c'); hold off
%