24小时热门版块排行榜    

CyRhmU.jpeg
查看: 602  |  回复: 5

mdl520

捐助贵宾 (著名写手)

[求助] mathmatics中想输出大于0的解 怎么做

mathmatics求解完成后,其中有大于0以及小于0的解,只想显示大于0的解,怎么操作?
回复此楼

» 猜你喜欢

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

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

Mr__Right

专家顾问 (著名写手)

【答案】应助回帖


感谢参与,应助指数 +1
mdl520: 金币+1, 有帮助 2015-05-06 22:46:55
增加约束条件, 比如

Solve[{x^2==1,x>0},x]

只输出  x->1
文章乃身外之物,要多考虑编辑、审稿人和读者的感受。
2楼2015-05-06 19:44:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

mdl520

捐助贵宾 (著名写手)

内容已删除
3楼2015-05-06 22:46:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

walk1997

金虫 (著名写手)

用Select应该比较容易轻松实现 建议给个具体的例子
4楼2015-05-07 12:21:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

walk1997

金虫 (著名写手)

提取x任意,Re[y]>0的解

result = NSolve[{x^3 + y^3 + 4 x*y == 10, y^3 + x^3 + x*y == 30}, {x,
   y}]
Select[result, MemberQ[#, (y -> t2_ /; Re[t2] > 0)] &]
5楼2015-05-07 12:29:39
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

mdl520

捐助贵宾 (著名写手)

引用回帖:
5楼: Originally posted by walk1997 at 2015-05-07 12:29:39
提取x任意,Re>0的解

result = NSolve
Select[result, MemberQ &]

Result = Solve[{d e/(1 - (f)^2) == a b/(1 - (c)^2),
   a b d/(1 - (a)^2) == f h i/(1 - (i)^2),
   d f i/(1 - (f)^2) == a b h/(1 - (b)^2),
   b e/(1 - (h)^2) == a d/(1 - (g)^2),
   b h i/(1 - (h)^2) == a d f/(1 - (d)^2), (a)^2 + (b)^2 + (c)^2 ==
    1, (d)^2 + (e)^2 + (f)^2 == 1, (g)^2 + (h)^2 + (i)^2 ==
    1, (a)^2 + (d)^2 + (g)^2 == 1, (b)^2 + (e)^2 + (h)^2 ==
    1, (i)^2 + (f)^2 + (c)^2 == 1}, {a, b, c, d, e, f, g, h, i}]
要求当a为0-1时 其他量的解的取值范围都在0-1的范围内输出
这个怎么编啊 求大神指点一二?
6楼2015-05-08 10:11:29
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 mdl520 的主题更新
信息提示
请填处理意见