x=0:400:5600;%给出X轴的坐标
y=0:400:4800; %给出Y轴的坐标
z=[1350 1370 1390 1400 1410 960 940 880 800 690 570 430 290 210 15
1370 1390 1410 1430 1440 1140 1110 1050 950 820 690 540 380 300 21
1380 1410 1430 1450 1470 1320 1280 1200 1080 940 780 620 460 370 35
1420 1430 1450 1480 1500 1550 1510 1430 1300 1200 980 850 750 550 50
1430 1450 1460 1500 1550 1600 1550 1600 1600 1600 1550 1500 1500 1550 155
950 1190 1370 1500 1200 1100 1550 1600 1550 1380 1070 900 1050 1150 120
910 1090 1270 1500 1200 1100 1350 1450 1200 1150 1010 880 1000 1050 110
880 1060 1230 1390 1500 1500 1400 900 1100 1060 950 870 900 930 95
830 980 1180 1320 1450 1420 1400 1300 700 900 850 840 380 780 75
740 880 1080 1130 1250 1280 1230 1040 900 500 700 780 750 650 55
650 760 880 970 1020 1050 1020 830 800 700 300 500 550 480 35
510 620 730 800 850 870 850 780 720 650 500 200 300 350 32
730 470 550 600 670 690 670 620 580 450 400 300 100 150 25 ];
mesh(x,y,z)%绘制原数据图
[X,Y]=meshgrid(0:100:5600,0:100:4800);
Z=interp2(x,y,z,X,Y,'spline');%在坐标上进行样条插值
hold on
mesh(X,Y,Z) %加密后的地形图
给你一个类似的程序你看看 |