24小时热门版块排行榜    

查看: 1969  |  回复: 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的回帖

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的回帖

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的回帖

sogooda

金虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★
xiegangmai: 金币+1, 谢谢参与! 2012-04-08 22:53:07
plxh: 金币+5, ★★★很有帮助, 大哥你说得对,我就是赶鸭子上架,好高骛远了。昨天又学习了下function文件和M文件的不同。现在已基本实现了把三个1/4圆画到一张图上了。现在的问题就是我想把产生数据的m文件的内容和画图的函数文件放到一起。可又总是出错。 2012-04-09 08:02:52
引用回帖:
5楼: Originally posted by plxh at 2012-04-08 13:44:10:
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=eta ...

针对你这个问题的解决方法是把
function plotSquare2(x0,y0,theta,a,mycolor)
以下的部分剪切出来,另存在一个m文件里就好了。

btw: 关于matlab的基础还是要学的。
6楼2012-04-08 21:22:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

plxh

木虫 (正式写手)

引用回帖:
6楼: Originally posted by sogooda at 2012-04-08 21:22:32:
针对你这个问题的解决方法是把
function plotSquare2(x0,y0,theta,a,mycolor)
以下的部分剪切出来,另存在一个m文件里就好了。

btw: 关于matlab的基础还是要学的。

看了你的回复,我受到了启发,是不是我可以在产生数据的m文件里面引用画图函数?
7楼2012-04-09 08:05:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

plxh

木虫 (正式写手)

引用回帖:
6楼: Originally posted by sogooda at 2012-04-08 21:22:32:
针对你这个问题的解决方法是把
function plotSquare2(x0,y0,theta,a,mycolor)
以下的部分剪切出来,另存在一个m文件里就好了。

btw: 关于matlab的基础还是要学的。

谢谢,已经实现了一个m文件即取得数据又绘出图。

向你请教一下,我是否可以用什么方式可以看到小方块  一个一个地方的变动过程呢?

Matlab的GUI或者Real Time Workshop 或者S-Function?

8楼2012-04-09 09:14:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

匿名

用户注销 (正式写手)

本帖仅楼主可见
9楼2014-12-02 15:55:44
已阅   申请仿真EPI   回复此楼   编辑   查看我的主页
相关版块跳转 我要订阅楼主 plxh 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料与化工一志愿南昌大学327求调剂推荐 +5 Ncdx123456 2026-03-13 6/300 2026-03-15 23:39 by lovewei0727
[考研] 本人考085602 化学工程 专硕 +7 不知道叫什么! 2026-03-15 8/400 2026-03-15 20:11 by 棒棒球手
[考研] 311求调剂 +5 冬十三 2026-03-15 5/250 2026-03-15 18:38 by 无际的草原
[考研] 0703化学调剂 ,六级已过,有科研经历 +4 曦熙兮 2026-03-15 4/200 2026-03-15 18:01 by JourneyLucky
[考研] 中科大材料与化工319求调剂 +3 孟鑫材料 2026-03-14 3/150 2026-03-14 20:10 by ms629
[考研] 313分生物学求调剂 +6 Yyt杨1 2026-03-09 8/400 2026-03-14 03:00 by JourneyLucky
[考研] 288求调剂 +14 王晓阳- 2026-03-09 19/950 2026-03-14 02:05 by JourneyLucky
[考研] 考研材料与化工,求调剂 +8 戏精丹丹丹 2026-03-09 8/400 2026-03-14 01:14 by JourneyLucky
[考研] 318求调剂 +3 李新光 2026-03-10 3/150 2026-03-14 00:21 by JourneyLucky
[考研] 311求调剂 +5 牛乳糖的卡卡 2026-03-10 5/250 2026-03-14 00:05 by JourneyLucky
[考研] 285化工学硕求调剂(081700) +6 柴郡猫_ 2026-03-12 6/300 2026-03-13 20:46 by hmn_wj
[考研] 289求调剂 +3 李政莹 2026-03-12 3/150 2026-03-13 11:02 by 求调剂zz
[考研] 282分材料专业求调剂院校 +18 枫桥ZL 2026-03-09 25/1250 2026-03-13 10:47 by 白夜悠长
[考研] 化工学硕306求调剂 +9 42838695 2026-03-12 9/450 2026-03-13 10:16 by houyaoxu
[考博] 福州大学杨黄浩课题组招收2026年专业学位博士研究生,2026.03.20截止 +3 Xiangyu_ou 2026-03-12 3/150 2026-03-13 09:36 by duanwu655
[考研] 341求调剂 +4 捣蛋猪猪 2026-03-11 4/200 2026-03-12 14:47 by ruiyingmiao
[考研] 0856材料与化工353分求调剂 +11 NIFFFfff 2026-03-09 11/550 2026-03-10 18:36 by suyuanhai
[考研] 收调剂 +7 调剂的考研学生 2026-03-10 7/350 2026-03-10 17:57 by 麦茶汤圆
[考研] 085602化工求调剂 +7 董boxing 2026-03-10 7/350 2026-03-10 17:07 by BruceLiu320
[考研] 数二英二309分请求调剂 +3 dtdxzxx 2026-03-09 4/200 2026-03-09 19:56 by yuningshan
信息提示
请填处理意见