数学建模社区-数学中国

标题: 2011国赛A题的图该怎么画 [打印本页]

作者: ednem 时间: 2011-12-19 19:41
标题: 2011国赛A题的图该怎么画
RT，看了一些得奖论文，感觉画的很美观！请教各位高手如何实现呢

作者: 火烧云 时间: 2011-12-25 20:39
使用gridata插值拟合
clear;
data=xlsread('F:\data1');
x=data(:,1);
y=data(:,2);
z=data(:,3);
a=data(:,4);
As=data(:,5);
Cd=data(:,6);
Cr=data(:,7);
Cu=data(:,8);
Hg=data(:,9);
Ni=data(:,10);
Pb=data(:,11);
Zn=data(:,12);

[X,Y,Z]=griddata(x,y,z,linspace(0,28654),linspace(0,28654)','v4');%插值
[X,Y,A]=griddata(x,y,a,linspace(0,28654),linspace(0,28654)','nearest');%插值
[X,Y,As_1]=griddata(x,y,As,linspace(0,28654),linspace(0,28654)','v4');%插值
% [X,Y,Cd_1]=griddata(x,y,Cd,linspace(0,28654),linspace(0,28654)','v4');%插值
% [X,Y,Cr_1]=griddata(x,y,Cr,linspace(0,28654),linspace(0,28654)','v4');%插值
% [X,Y,Cu_1]=griddata(x,y,Cu,linspace(0,28654),linspace(0,28654)','v4');%插值
% [X,Y,Hg_1]=griddata(x,y,Hg,linspace(0,28654),linspace(0,28654)','v4');%插值
% [X,Y,Ni_1]=griddata(x,y,Ni,linspace(0,28654),linspace(0,28654)','v4');%插值
% [X,Y,Pb_1]=griddata(x,y,Pb,linspace(0,28654),linspace(0,28654)','v4');%插值
% [X,Y,Zn_1]=griddata(x,y,Zn,linspace(0,28654),linspace(0,28654)','v4');%插值
%

%scatter(x,y,5,z);
%title('散点图');
%figure
%pcolor(X,Y,A);shading interp%伪彩色图
%title('伪彩色图');
contourf(X,Y,A)
grid on
title('区域图');
colorbar();
xlabel('1-生活区 2-工业区 3-山区 4-交通区 5-公园绿地');

figure,contourf(X,Y,Z)%等高线图
colorbar();
title('地形等高线图')
grid on

figure,surf(X,Y,Z)
view(-20,45);
colorbar();

作者: Dreamweaver_8 时间: 2012-1-17 10:10
clc
clear
close all
data=xlsread('usefull.xls');
x=data(:,2);
y=data(:,3);
z=data(:,4);
T=x;
D=y;
K=z;
[x,y,z]=griddata(T,D,K,linspace(min(T),max(T))',linspace(min(D),max(D)),'cubic');
figure,surf(x,y,z);
title('地形-采样点')
hold on
data=xlsread('usefull.xls');
x=data(:,2);
y=data(:,3);
z=data(:,4);
plot3(x,y,z,'r*');
legend('红*表示采样点')
hold on
colormap(gray)

作者: wangbo1117 时间: 2012-1-27 14:49
那个图可以用suffer软件画出来，到网上下载一个，然后再下载一个说明就行了。

作者: cherrydons 时间: 2012-2-9 11:13
用image画二维的也行哦颜色表示大小再来个colorbar 挺好的

作者: 新生泪 时间: 2012-2-20 20:53
其实可以用surf（X,Y,Z,C）搞定，最好图形重叠，这样直观

欢迎光临数学建模社区-数学中国 (http://www.madio.net/)