24小时热门版块排行榜    

查看: 2628  |  回复: 8
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

plxh

木虫 (正式写手)

[求助] 继续求助Matlab绘图!

在帖子http://muchong.com/bbs/viewthread.php?tid=4346449中部分实现了绘图目标。感谢sogooda朋友!
现在情况是:得到了520*3的矩阵,前两列是点的XY坐标,第三列是与圆心成的角度。

现在想要实现:
一、colorbar按矩阵行数从黑色[0 0 0]过渡到绿色[0 1 0],
二、在图上划出形状,首先是质心与圆心连线和Y轴角度的值是第三列数据,然后画出图上所示的形状并填充采样时刻(所在的第几行)对应的颜色。


希望得到大家的建议与帮助!效果图和mat文件如下。

效果图[ Last edited by plxh on 2012-4-8 at 09:43 ]
回复此楼

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : matlab.mat
  • 2012-04-08 09:42:48, 9.33 K

» 本帖@通知

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

plxh

木虫 (正式写手)

xiegangmai: , 帖子中代码部分可以用“插入代码”功能 2012-04-08 22:52:58
引用回帖:
2楼: Originally posted by sogooda at 2012-04-08 12:02:00:
兄弟你的数据太密了,画出来都看不出来效果。
下面的程序里是将数据1/5稀疏之后的效果图。


function Untitled2
clear;clc;close all
load matlab
eta1=eta1(1:5:end,;

x=eta1(:,2);
y=eta1(:,1);
...

clear;clc;close all
load matlab3
for i=1:3;
    if i==1   %必须是用两个等号。
            
        eta12=eta1(1:5:end,;

        x=eta12(:,2);
        y=eta12(:,1);
        % theta=eta1(:,3); % ?

        theta=pi/2-eta12(:,3);
        figure1=figure('color','w');plot(x,y);hold on;axis equal
        myr=linspace(0,0,length(x));
        myg=linspace(0,1,length(x));
        myb=linspace(0,0,length(x));
        for jj=1:length(x)   
            plotSquare2(x(jj),y(jj),theta(jj),1/30,[myr(jj),myg(jj),myb(jj)]);
        end
        colormap([myr', myg', myb'])
        colorbar
        hold on;


    elseif i==2
         
        eta22=eta2(1:5:end,;

        x=eta22(:,2);
        y=eta22(:,1);
        % theta=eta1(:,3); % ?

        theta=pi/2-eta22(:,3);
        figure1=figure('color','w');plot(x,y);hold on;axis equal
        myr=linspace(0,0,length(x));
        myg=linspace(0,1,length(x));
        myb=linspace(0,0,length(x));
        for jj=1:length(x)   
            plotSquare2(x(jj),y(jj),theta(jj),1/30,[myr(jj),myg(jj),myb(jj)]);
        end
        colormap([myr', myg', myb'])
        colorbar
        hold on;
        
    elseif i==3        
           
        eta32=eta1(1:5:end,;

        x=eta32(:,2);
        y=eta32(:,1);
        % theta=eta1(:,3); % ?

        theta=pi/2-eta32(:,3);
        figure1=figure('color','w');plot(x,y);hold on;axis equal
        myr=linspace(0,0,length(x));
        myg=linspace(0,1,length(x));
        myb=linspace(0,0,length(x));
        for jj=1:length(x)   
            plotSquare2(x(jj),y(jj),theta(jj),1/30,[myr(jj),myg(jj),myb(jj)]);
        end
        colormap([myr', myg', myb'])
        colorbar
        hold on;
    end   
    end
   
   


function plotSquare2(x0,y0,theta,a,mycolor)
xs=[-2*a,-2*a,2*a,3*a,2*a,-2*a];
ys=[a,-a,-a,0,a,a];

xy=[cos(theta),-sin(theta);
    sin(theta),cos(theta)]*[xs;ys] ;

fill(xy(1,+x0,xy(2,+y0,mycolor)




为什么会报警呢?
报警:
??? Error: File: Untitled4.m Line: 70 Column: 1
Function definitions are not permitted at the prompt or in scripts.
5楼2012-04-08 13:44:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 9 个回答

sogooda

金虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
plxh: 金币+5, ★★★很有帮助, 先谢谢!我理解理解! 2012-04-08 12:03:51
xiegangmai: 金币+2, 谢谢应助! 2012-04-08 22:52:38
兄弟你的数据太密了,画出来都看不出来效果。
下面的程序里是将数据1/5稀疏之后的效果图。
CODE:
function Untitled2
clear;clc;close all
load matlab
eta1=eta1(1:5:end,:);

x=eta1(:,2);
y=eta1(:,1);
% theta=eta1(:,3); % ?

theta=pi/2-eta1(:,3);
figure1=figure('color','w');plot(x,y);hold on;axis equal
myr=linspace(0,0,length(x));
myg=linspace(0,1,length(x));
myb=linspace(0,0,length(x));
for jj=1:length(x)   
    plotSquare2(x(jj),y(jj),theta(jj),1/30,[myr(jj),myg(jj),myb(jj)]);
end
colormap([myr', myg', myb'])
colorbar
saveas(gcf,'untitled2.jpg')


function plotSquare(x0,y0,theta,a,mycolor)
xs=[-2*a,-2*a,2*a,3*a,2*a,-2*a];
ys=[a,-a,-a,0,a,a];

xy=[cos(theta),-sin(theta);
    sin(theta),cos(theta)]*[xs;ys] ;

fill(xy(1,:)+x0,xy(2,:)+y0,mycolor)



2楼2012-04-08 12:02:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

plxh

木虫 (正式写手)

引用回帖:
2楼: Originally posted by sogooda at 2012-04-08 12:02:00:
兄弟你的数据太密了,画出来都看不出来效果。
下面的程序里是将数据1/5稀疏之后的效果图。


function Untitled2
clear;clc;close all
load matlab
eta1=eta1(1:5:end,;

x=eta1(:,2);
y=eta1(:,1);
...

兄弟,我看了你的新浪博客,你真是牛人!
3楼2012-04-08 12:04:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

plxh

木虫 (正式写手)

引用回帖:
2楼: Originally posted by sogooda at 2012-04-08 12:02:00:
兄弟你的数据太密了,画出来都看不出来效果。
下面的程序里是将数据1/5稀疏之后的效果图。


function Untitled2
clear;clc;close all
load matlab
eta1=eta1(1:5:end,;

x=eta1(:,2);
y=eta1(:,1);
...

大哥,如果要一张图上画出来原理完全一样但半径不一样的三个呢?

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : 3个.bmp
  • 2012-04-08 13:19:06, 2.52 M
  • 附件 2 : matlab3.mat
  • 2012-04-08 13:19:06, 30.89 K
4楼2012-04-08 13:20:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[教师之家] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 FChKX8meu1ds 2026-11-09 4/200 2026-11-10 21:13 by Z7qfCsdIiD1T
[论文投稿] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +4 cqv1zKnzd7hr 2026-11-09 5/250 2026-11-10 20:34 by Z7qfCsdIiD1T
[论文投稿] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +4 cqv1zKnzd7hr 2026-11-09 5/250 2026-11-10 20:29 by Z7qfCsdIiD1T
[教师之家] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +4 0TEMgxdT1eIw 2026-11-09 5/250 2026-11-10 20:01 by Z7qfCsdIiD1T
[考研] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +4 0TEMgxdT1eIw 2026-11-09 5/250 2026-11-10 19:56 by Z7qfCsdIiD1T
[硕博家园] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +4 0TEMgxdT1eIw 2026-11-09 5/250 2026-11-10 19:45 by Z7qfCsdIiD1T
[考研] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 zSbvVX9JFl9J 2026-11-09 4/200 2026-11-10 19:17 by czAiolzR0IJC
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 FChKX8meu1ds 2026-11-09 3/150 2026-11-10 16:32 by G2rhSvqvhNzl
[考博] 申请环境,微生物方向博士 +3 浅笑09 2026-11-08 3/150 2026-11-10 12:44 by 可淡不可忘
[教师之家] 延安大学回应“副教授留绝笔信”:确已离世,正核实举报内容 +4 yexuqing 2026-11-04 6/300 2026-11-10 11:13 by susizheng
[教师之家] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 zSbvVX9JFl9J 2026-11-09 5/250 2026-11-10 09:23 by 1yv6QACPoY1E
[文学芳草园] 厉娜 +3 张丹枫1991 2026-11-09 5/250 2026-11-09 16:53 by 张丹枫1991
[考博] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +5 5sJFDKp2kwuI 2026-11-06 15/750 2026-11-09 11:41 by GwrQVVR6Oenx
[考研] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 5sJFDKp2kwuI 2026-11-06 12/600 2026-11-09 06:32 by l48hFd8Nwae2
[公派出国] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +4 5sJFDKp2kwuI 2026-11-06 8/400 2026-11-09 00:14 by l48hFd8Nwae2
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +5 ttH3f1oA6ace 2026-11-04 10/500 2026-11-06 16:12 by 5sJFDKp2kwuI
[公派出国] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +6 ttH3f1oA6ace 2026-11-04 12/600 2026-11-06 16:10 by 5sJFDKp2kwuI
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +5 kvewwGtKktqB 2026-11-04 14/700 2026-11-06 05:10 by qL1cU46YIdK0
[硕博家园] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +6 kvewwGtKktqB 2026-11-04 16/800 2026-11-06 05:00 by qL1cU46YIdK0
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 ttH3f1oA6ace 2026-11-04 9/450 2026-11-06 02:02 by qL1cU46YIdK0
信息提示
请填处理意见