实现柱状图正负颜色不同，增加小刻度线

clear
clcdata = xlsread('ecof(zcm).xls');hold on 
for i = 1 : length(data)if data(i,1)> 0bar(data(i,2),data(i,1),0.5,'b') % 正数用蓝色elsebar(data(i,2),data(i,1),0.5,'k') % 负数用黑色end
end
% set(gca,'Fontname', 'Times New Roman');
xlim([1960,2019])
box on
ylabel('时间系数')
xlabel('年份')
set(gca,'xminortick','on','TickDir','out')
% 设置刻度线长短
ax = gca;
ax.XAxis.TickLength = [0.02,0.1];

效果图：