MATLAB绘制柱状剖面
组合图
本文作者：第八星系-李智
联系邮箱：lizhi258147369@163.com
clear;clc
%降水柱状图
subplot(2,1,1)%组图2行1列第1张图
x1=xlsread('温度降水.xlsx','日期','A2:A366');%读取横坐标
y1=xlsread('温度降水.xlsx','降水','A2:A366');%读取纵坐标
bar(x1,y1,1)%绘制柱状图
ylabel('mm')%y轴坐标
axis([0,365,-1,10]) %确定坐标框大小
text(20,8,'Test','fontname','Times New Roman','fontsize',12,'fontweight','bold')%设置标题参数
set(gca,'XTick',[ 32 60 91 121 152 182 213 244 274 305 335])
set(gca,'xticklabel',{'02-01','03-01','04-01','05-01','06-01','07-01','08-01','09-01','10-01','11-01','12-01'})%x轴刻度
%上边这俩行，第二行给第一行指定的位置添加描述
set(subplot(2,1,1),'fontname','Times New Roman','fontsize',13,'fontweight','bold','LineWidth',5)%设置图框参数
% 剖面图
subplot(2,1,2)
x = xlsread('温度降水.xlsx','日期','A2:A366');%读取横坐标
xmax = max(x);
xmin = min(x);
y = [30 60 120 160 180];%土壤深度，即纵坐标
ymax = max(y);
ymin = min(y);
z = xlsread('温度降水.xlsx','温度','A2:E366');%每一个（x,y）点上的值
C=z';
N = 365; % 每个维度的数据点数
[X,Y]=meshgrid(linspace(xmin,xmax,N),linspace(ymin,ymax,N));% 网格化x,y二维空间
Z =griddata(x,y,C,X,Y,'linear');% 采用插值法扩展数据，使用'linear'的方法
contourf(X,Y,Z,N, 'LineColor','none');%设置等高线图
colormap('jet')%设置颜色图
colorbar('fontname','Times New Roman','FontSize',15,'LineWidth',5)%设置色阶的颜色栏参数
hold on
ylabel('cm') %y轴坐标描述
set(gca,'XTick',[32 60 91 121 152 182 213 244 274 305 335])
set(gca,'xticklabel',{'02-01','03-01','04-01','05-01','06-01','07-01','08-01','09-01','10-01','11-01','12-01','fontname','Times New Roman','fontsize',20,'fontweight','bold'})%x轴刻度和参数
set(gca,'YTick',[30 60 120 160 180])
set(gca,'yticklabel',{'30', '60', '120', '160', '180'})%y轴刻度和参数
set(subplot(2,1,2),'fontname','Times New Roman','fontsize',13,'fontweight','bold','LineWidth',5)%设置图框参数
第一步，打开figure1窗口，单击编辑绘图的箭头标呈蓝色
第二步，点击工具，勾选查看布局网格
第三步，点击剖面图边框，鼠标在框边呈十字箭头时按住鼠标左键可移动图像，呈一字箭头时按住鼠标左键可伸缩图像
第四步，点击文件，选择导出文件
第五步，点击渲染，把分辨率改为600，最后点导出
clear;clc
%降水柱状图
subplot(2,1,1)%组图2行1列第1张图
x1=xlsread('温度降水.xlsx','日期','A2:A366');%读取横坐标
y1=xlsread('温度降水.xlsx','降水','A2:A366');%读取纵坐标
bar(x1,y1,1)%绘制柱状图
ylabel('mm')%y轴坐标
axis([0,365,-1,10]) %确定坐标框大小
text(20,8,'Test','fontname','Times New Roman','fontsize',12,'fontweight','bold')%设置标题参数
set(gca,'XTick',[ 32 60 91 121 152 182 213 244 274 305 335])
set(gca,'xticklabel',{'02-01','03-01','04-01','05-01','06-01','07-01','08-01','09-01','10-01','11-01','12-01'})%x轴刻度
%上边这俩行，第二行给第一行指定的位置添加描述
set(subplot(2,1,1),'fontname','Times New Roman','fontsize',13,'fontweight','bold','LineWidth',5)%设置图框参数
% 剖面图
subplot(2,1,2)
x = xlsread('温度降水.xlsx','日期','A2:A366');%读取横坐标
xmax = max(x);
xmin = min(x);
y = [30 60 120 160 180];%土壤深度，即纵坐标
ymax = max(y);
ymin = min(y);
z = xlsread('温度降水.xlsx','温度','A2:E366');%每一个（x,y）点上的值
C=z';
N = 365; % 每个维度的数据点数
[X,Y]=meshgrid(linspace(xmin,xmax,N),linspace(ymin,ymax,N));% 网格化x,y二维空间
Z =griddata(x,y,C,X,Y,'linear');% 采用插值法扩展数据，使用'linear'的方法
contourf(X,Y,Z,N, 'LineColor','none');%设置等高线图
colormap('jet')%设置颜色图
colorbar('fontname','Times New Roman','FontSize',15,'LineWidth',5)%设置色阶的颜色栏参数
hold on
ylabel('cm') %y轴坐标描述
set(gca,'XTick',[32 60 91 121 152 182 213 244 274 305 335])
set(gca,'xticklabel',{'02-01','03-01','04-01','05-01','06-01','07-01','08-01','09-01','10-01','11-01','12-01','fontname','Times New Roman','fontsize',20,'fontweight','bold'})%x轴刻度和参数
set(gca,'YTick',[30 60 120 160 180])
set(gca,'yticklabel',{'30', '60', '120', '160', '180'})%y轴刻度和参数
set(subplot(2,1,2),'fontname','Times New Roman','fontsize',13,'fontweight','bold','LineWidth',5)%设置图框参数
请勿回复 第八星系 外其他字
本文编辑：myp
