function ShowGene(X,Z,i)

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