QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 8143|回复: 8
打印 上一主题 下一主题

怎么用Mathematica在一个坐标是里同时绘多个图

[复制链接]
字体大小: 正常 放大
xiaoxing5        

2

主题

7

听众

31

积分

升级  27.37%

  • TA的每日心情
    奋斗
    2013-4-7 09:48
  • 签到天数: 6 天

    [LV.2]偶尔看看I

    自我介绍
    本人在读硕士,研究方向:光学
    跳转到指定楼层
    1#
    发表于 2013-3-24 19:07 |只看该作者 |倒序浏览
    |招呼Ta 关注Ta
    例如函数F(x,y),怎么使用命令在同一个坐标系里绘制y=1,y=2,y=3,F(x)的函数。并在图中用不同的颜色表示,并说明那种颜色是哪个图。求大神指点!!
    ! f4 _  D2 }" A- }: O8 K  k急急急。。。。在线等。。。。。
    zan
    转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
    xiaoxing5        

    2

    主题

    7

    听众

    31

    积分

    升级  27.37%

  • TA的每日心情
    奋斗
    2013-4-7 09:48
  • 签到天数: 6 天

    [LV.2]偶尔看看I

    自我介绍
    本人在读硕士,研究方向:光学
    回复

    使用道具 举报

    xiaoxing5        

    2

    主题

    7

    听众

    31

    积分

    升级  27.37%

  • TA的每日心情
    奋斗
    2013-4-7 09:48
  • 签到天数: 6 天

    [LV.2]偶尔看看I

    自我介绍
    本人在读硕士,研究方向:光学
    问题已在小木虫上解决,如下' h' \1 L( m$ ?, g% n
    Plot函数可以有这样的形式的:
    5 Z; \0 ?9 W/ E" TPlot[{f1,f2,....},{x,x_min,x_max]}]! ?7 D" z% V3 [3 B* H( n# b
    也就是说可以对同一自变量的多个函数进行绘图,所有曲线是在一张图(也就是你说的同一坐标系)里画出来的。$ D- k. C4 z4 R
    所以,你一开始要求的画y=1,y=2,y=3,F(x)的图,用我以前说的那个是可以的。
    % a/ I: Q& w; u$ F: {再说你第二帖所说的函数,其中a是个变量,x是自变量。就是关于不同的a画多条曲线吧?, f7 D& a  G9 N) K1 S& d
    按照同样的逻辑,程序写成这样的:
    - f& C0 X( y0 L5 hy = a x^2 + 2 a Sin[x] - 5* D& }. k; ?4 S
    Plot[{y /. a -> 1, y /. a -> 2, y /. a -> 3, y /. a -> 4,
    : P/ S8 `; q0 [+ W  y /. a -> 5}, {x, -3, 3}]9 F- }! W8 i$ O/ Q1 V
    看下效果是不是你要的?
    / T& ^  e( a. Z7 @注:由于本人目前没有上传图片的权限,在此就不能把显示效果展示给各位看了,再次再次向小木虫的网友mshwangg表示感谢
    回复

    使用道具 举报

    joy81890        

    0

    主题

    7

    听众

    216

    积分

    升级  58%

  • TA的每日心情
    开心
    2014-4-7 07:08
  • 签到天数: 56 天

    [LV.5]常住居民I

    自我介绍
    NULL

    RE: 怎么用Mathematica在一个坐标是里同时绘多个图

    本帖最后由 joy81890 于 2013-3-27 19:51 编辑 + b  F4 B* [' }: H
    7 s2 e6 B7 f* ]( i4 y" }
    2013-03-27_074359.jpg

    点评

    xiaoxing5  F = p1*(p2 + p3 + p4 - p5); Plot[{F /. f -> 0.35, F /. f -> 0.40, F /. f -> 0.45}, {x, -0.001, 0.001}, PlotLegends -> LineLegend[{ Red, Green, Blue}, {"y=1", "y=3", "y= 2"}, LegendF  详情 回复 发表于 2013-3-28 19:07
    回复

    使用道具 举报

    xiaoxing5        

    2

    主题

    7

    听众

    31

    积分

    升级  27.37%

  • TA的每日心情
    奋斗
    2013-4-7 09:48
  • 签到天数: 6 天

    [LV.2]偶尔看看I

    自我介绍
    本人在读硕士,研究方向:光学
    joy81890 发表于 2013-3-27 19:43

    - l1 w$ Q% V* R* jF = p1*(p2 + p3 + p4 - p5);8 d% E" _6 B+ ]) K
    Plot[{F /. f -> 0.35, F /. f -> 0.40, 5 E" l3 l( G3 o" v+ C+ R5 k8 X& w
        F /. f -> 0.45}, {x, -0.001, 0.001}, PlotLegends -> LineLegend[{! s) e) @$ \  v4 o
          Red, Green, Blue}, {"y=1", "y=3", "y=$ {5 R# y( ~5 q1 H
        2"}, LegendFunction -> "Panel", LegendMarkerSize -> {{10, 8}}],
    & Q4 R5 a( l; @  s: l) R7 A      AxesLabel -> {"x", "光 强I"}, PlotStyle -> {Red, Blue, Greenn}];. @! O1 E# g2 G6 i2 o# a& s, L' w

    ! V5 a  t8 P5 U8 `; \5 e为什么我的程序画不出要想要的图呢?以上是最后画图命令。LegendMarkerSize -> {{10, 8}}这句话是什么意思呢?下面是错误提示. L1 K- ~# f  `5 g/ N2 j' g; s
    # `1 _) B7 Q; V
    Unknown option PlotLegends in \[LeftSkeleton]1\[RightSkeleton]
    回复

    使用道具 举报

    joy81890        

    0

    主题

    7

    听众

    216

    积分

    升级  58%

  • TA的每日心情
    开心
    2014-4-7 07:08
  • 签到天数: 56 天

    [LV.5]常住居民I

    自我介绍
    NULL
    xiaoxing5 发表于 2013-3-28 19:07 $ w! u& |5 c: @% b8 ?" g
    F = p1*(p2 + p3 + p4 - p5);
    ) Y: [* L& _# P( k' V  W1 r8 PPlot[{F /. f -> 0.35, F /. f -> 0.40, + B4 T& U: i% l: f
        F /. f -> 0.45}, {x, -0.0 ...
    & ~: t( g& k6 p% N; F% i
    可能因为你用的是Mathematica 9 以下的版本,那样的话,就改为: " c5 M) M' }8 W0 n- L! c9 h
    Plot[{1, 2, 3}, {x, -0.5, 3}, PlotRange -> {0, 3.5},  PlotLegends -> {"y=1", "y=2", "y=3"}, Ticks -> {{}, {1, 2, 3}},  AxesLabel -> {"x", "y"}]& F$ B# Q) `; |

    - p# [7 F( E" E3 }9 o 2013-03-28_195403.jpg
    4 i! \2 f: g2 A  R  D
    : R. y( b2 E8 A3 Y) M( s有多种方法绘这个图,但这个是我能想到的最简单的,最常规的方法。“LegendMarkerSize -> {{10, 8}}” 是定义图例(Plot Legends Panel))大小。
    回复

    使用道具 举报

    joy81890        

    0

    主题

    7

    听众

    216

    积分

    升级  58%

  • TA的每日心情
    开心
    2014-4-7 07:08
  • 签到天数: 56 天

    [LV.5]常住居民I

    自我介绍
    NULL
    本帖最后由 joy81890 于 2013-3-29 08:12 编辑
    3 U. o, [- V! w- P& g. o2 m/ q; ~" M3 |! g
    那可能是因为你用的是Mathematica 9 以下的版本,那就改为:
    $ c( V: A% Q: R% ?, A9 l8 `% X+ e6 `  v
    Plot[{1, 2, 3}, {x, -0.5, 3}, PlotLegends -> {"y=1", "y=2", "y=3"}, PlotRange -> {0, 3.5},  Ticks -> {{}, {1, 2, 3}},  AxesLabel -> {"x", "y"}]8 ]7 D9 ~- B( B6 w
    3 J4 }' c5 e6 E2 |
    2013-03-28_195403.jpg
    , L+ A4 m9 a4 T! f: a* ?7 P1 F
    8 D: s$ A9 j! {% x2 o# i1 {
    ”LegendMarkerSize -> {{10, 8}}“是定义图例(Plot Legends Panel)大小。

    点评

    xiaoxing5  我用的是5.0,可能是我用的版本太低的缘故吧,系统一直提示不能识别操作。 非常感谢热心您的帮助  详情 回复 发表于 2013-4-7 09:51
    xiaoxing5  我用的是5.0,可能是我用的版本太低的缘故吧,系统一直提示不能识别操作。 非常感谢热心您的帮助  详情 回复 发表于 2013-4-7 09:51
    回复

    使用道具 举报

    xiaoxing5        

    2

    主题

    7

    听众

    31

    积分

    升级  27.37%

  • TA的每日心情
    奋斗
    2013-4-7 09:48
  • 签到天数: 6 天

    [LV.2]偶尔看看I

    自我介绍
    本人在读硕士,研究方向:光学
    joy81890 发表于 2013-3-29 08:08
    $ ~0 a+ {( N6 _' y那可能是因为你用的是Mathematica 9 以下的版本,那就改为:
    0 u2 Y' f+ L/ H) _
    6 q) z9 {' U+ }+ X: _; XPlot[{1, 2, 3}, {x, -0.5, 3}, PlotLegend ...

    4 g$ f3 R. B- {5 H# q4 b! v我用的是5.0,可能是我用的版本太低的缘故吧,系统一直提示不能识别操作。
    % o; d$ s' Y/ W+ @8 Z  v2 }* z非常感谢热心您的帮助
    回复

    使用道具 举报

    xiaoxing5        

    2

    主题

    7

    听众

    31

    积分

    升级  27.37%

  • TA的每日心情
    奋斗
    2013-4-7 09:48
  • 签到天数: 6 天

    [LV.2]偶尔看看I

    自我介绍
    本人在读硕士,研究方向:光学
    joy81890 发表于 2013-3-29 08:08 2 j% @! e8 R  g4 L  w& l
    那可能是因为你用的是Mathematica 9 以下的版本,那就改为:
      Q1 b1 H8 E! V+ c! S2 f" T* `
    1 R9 K( m+ J% }Plot[{1, 2, 3}, {x, -0.5, 3}, PlotLegend ...

    3 [) E: f3 m) g! E. D. H我用的是5.0,可能是我用的版本太低的缘故吧,系统一直提示不能识别操作。
    : |9 R2 Z" {5 u. f, F& C非常感谢热心您的帮助
    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | 注册地址

    qq
    收缩
    • 电话咨询

    • 04714969085
    fastpost

    关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

    手机版|Archiver| |繁體中文 手机客户端  

    蒙公网安备 15010502000194号

    Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

    GMT+8, 2025-10-24 22:27 , Processed in 0.845116 second(s), 94 queries .

    回顶部