这种图我画过，大致与楼主的图一个类型，用pcolor画的，因为中间有白条的原因，不能一次画出来，需要用循环，一次画一条。至于平滑过渡的问题，我使用的是shading interp。（如果回答错误，请忽略，嘿嘿）
好像为了分析振动如何传过来的。即传递路径之类的。分析不同位置频率分量功率值，确认震源吧！（还不了解传递路径分析原理，待案例学习）。或请楼主简要指点指点。 试了试。有意思；
close all
clc
M=magic(10);
subplot(5,1,1)
image(M(1:2,:))
axis off
text(0,3,'发动机顶','Rotation',90)
subplot(5,1,2)
image(M(3:4,:))
axis off
text(0,3,'发动机侧','Rotation',90)
subplot(5,1,3)
image(M(5:6,:))
axis off
text(0,2,'悬下','Rotation',90)
subplot(5,1,4)
image(M(7:8,:))
axis off
text(0,2,'悬上','Rotation',90)
subplot(5,1,5)
image(M(9:10,:))
axis off
% box off
text(0,3,'传动箱上','Rotation',90)
text(1,3,'1 2 3 4 5 6 7 8 9 10')
figure
subplot(5,1,1)
image(M(1,:))
axis off
text(0,1.5,'发动机顶','Rotation',90)
subplot(5,1,2)
image(M(2,:))
axis off
text(0,1.5,'发动机侧','Rotation',90)
subplot(5,1,3)
image(M(3,:))
axis off
text(0,1.25,'悬下','Rotation',90)
subplot(5,1,4)
image(M(4,:))
axis off
text(0,1.25,'悬上','Rotation',90)
subplot(5,1,5)
image(M(5,:))
axis off
text(0,1.5,'传动箱上','Rotation',90)
text(1,1.75,'1 2 3 4 5 6 7 8 9 10')
figure
subplot(5,1,1)
C=ones(2,1)*M(1,:);
pcolor(C)
shading interp
axis off
text(0,1,'发动机顶','Rotation',45)
subplot(5,1,2)
C=ones(2,1)*M(2,:);
pcolor(C)
shading interp
axis off
text(0,1,'发动机侧','Rotation',45)
subplot(5,1,3)
C=ones(2,1)*M(3,:);
pcolor(C)
shading interp
axis off
text(0,1.25,'悬下','Rotation',45)
subplot(5,1,4)
C=ones(2,1)*M(4,:);
pcolor(C)
shading interp
axis off
text(0,1,'悬上','Rotation',45)
subplot(5,1,5)
C=ones(2,1)*M(5,:);
pcolor(C)
shading interp
axis off
text(0,1,'传动箱上','Rotation',45)
text(1,0.5,'1 2 3 4 5 6 7 8 9 10')
页:
1
[2]