function Y = barMeanIntens(controleIntensV1,controleIntensV2,adaptIntensV1,adaptIntensV2,recupIntensV1,recupIntensV2)
% barplot des intensite de reponse aux orientations pour les sessions
% controle/adaptation/recuperation. Les intensites sont comrarees entre V1
% et V2.

Y = [mean(controleIntensV1(:)) mean(controleIntensV2(:)); mean(adaptIntensV1(:)) mean(adaptIntensV2(:)) ; mean(recupIntensV1(:)) mean(recupIntensV2(:))];
bar(Y)
ylabel('intensites moyennes par rapport au controle');
set(gca,'XTickLabel',{'controle','adaptation','recuperation'})
legend({'V1', 'V2'}, 'Location', 'SouthOutside');
