%Enter Directory
load('DIRECTORY/Input.m')

Sparse(Sparse==0)=nan;
MVY=Sparse(:,[1 5 14 16 28 30 36 37 39 44]);
LVY=Sparse(:,[2 4 6 12 18 19 23 25 29 41]);
stdS=nanstd(Sparse,0,'all');

MVY(abs(MVY)<stdS)=nan;
LVY(abs(LVY)<stdS)=nan;

MVY=MVY(:);
LVY=LVY(:);

figure
hist(MVY,20)
h = findobj(gca,'Type','patch');
set(h,'FaceColor','r','EdgeColor','w','facealpha',0.75)
hold on
hist(LVY,20)
h = findobj(gca,'Type','patch');
set(h,'facealpha',0.75);
ylabel('counts')
xlabel('Sparse Values')
legend('MVY','LVY')


