找回密码
 注册
Simdroid-非首页
查看: 90|回复: 3

[图形图像] 有个方程,除x外,还有个常数可以变化,想只写1个代码就把它们分别画出来

[复制链接]
发表于 2011-4-15 23:48:08 | 显示全部楼层 |阅读模式 来自 美国
本帖最后由 zsmiup 于 2011-4-15 23:49 编辑

T = 0.9 ;
g[\[Rho]_] := -3 \[Rho] - 8/3*T*Log[3/\[Rho] - 1] + p/\[Rho]
p = {.40, .58, .647, .68, .80};
Plot[g[\[Rho]], {\[Rho], 0, 3},
PlotStyle -> {Orange, Thick, DotDashed, Red, Blue},
PlotRange -> {{0, 3}, {-3, -5}}, Frame -> True, PlotLabel -> True]



原帖打不开,重发下, 谢谢。另请楼主 删除原帖。 谢谢

g[\[Rho]_] := -3 \[Rho] - 8/3*T*Log[3/\[Rho] - 1] + p/\[Rho]

(*方程,其中最后一项,p 可以取5个不同的值,下面是p的五个值*)

p = {.40, .58, .647, .68, .80};

Plot[g[\[Rho]], {\[Rho], 0, 3},
PlotStyle -> {Orange, Thick, DotDashed, Red, Blue},
PlotRange -> {{0, 3}, {-3, -5}}, Frame -> True]

现在,这五个曲线都在一个图里,而且PlotStyle 都是一样的,
我想把这五个曲线画在不同的图里,或者至少PlotStyle改变下,应该怎么写呢,谢谢?
发表于 2011-4-16 07:29:38 | 显示全部楼层 来自 山东济南
Simdroid开发平台
Table[Plot[g[\[Rho]][[i]], {\[Rho], 0, 3}], {i, 1, 5}]
回复 不支持

使用道具 举报

发表于 2011-4-16 21:17:00 | 显示全部楼层 来自 台湾
T = 0.9;
g[\[Rho]_] := -3 \[Rho] - 8/3*T*Log[3/\[Rho] - 1] + p/\[Rho]
p = {.40, .58, .647, .68, .80}; Plot[
Evaluate@g[\[Rho]], {\[Rho], 0, 3},
PlotStyle -> {Orange, Thick, DotDashed, Red, Blue},
PlotRange -> {{0, 3}, {-3, -5}}, Frame -> True]
回复 不支持

使用道具 举报

 楼主| 发表于 2011-4-16 23:14:40 | 显示全部楼层 来自 美国
谢谢
treemantan 和

chungyuan 的解


请问 您们能不能 简单的解释下
1 Table[Plot[g[\[Rho]][[i]], {\[Rho], 0, 3}], {i, 1, 5}]

Table[表达式,{变量,上下限},{变量上下限}]
想请问下 表达式g[Rho] 后边的[i] 是什么意思?
而且如果有Plot的命令,应该有 Rho 的上下限在Plot 命令里{help file},但是您把它放到Table 的命令里,这个是什么原理?
还有  最后的结果是 {图,图,图,图} 的样子
我想用 XXX /. Table (replaceall) 的命令 把它置换成 图,图,图,图 的形式, /. 前面应该用哪个变量来表示图呢??
谢谢




Evaluate的用法, 看帮助文档没看明白,还有就是Evaluate 后面的@,在这里是什么意思 ?? 谢谢
Evaluate@g[\[Rho]], {\[Rho], 0, 3},
回复 不支持

使用道具 举报

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

本版积分规则

Archiver|小黑屋|联系我们|仿真互动网 ( 京ICP备15048925号-7 )

GMT+8, 2024-4-28 08:31 , Processed in 0.032243 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表