应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

Znn3bq.jpeg
小木虫论坛-学术科研互动平台 » 专业学科区 » 数学 » 数学综合 » Mathematica中含参数的方程求解时如何自动舍去虚数解或不符合条件的解
汕头大学海洋科学接受调剂
51/1返回列表
查看: 3475  |  回复: 7
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

青沙山

木虫 (小有名气)

[求助] Mathematica中含参数的方程求解时如何自动舍去虚数解或不符合条件的解 已有1人参与

本人用的是9.0版，求解一个含参数的方程时若添加解的条件时，总是解不出来，求高手指点?

我想添加个解的不等式条件或者解必须是实数的条件，见下图：
Mathematica中含参数的方程求解时如何自动舍去虚数解或不符合条件的解
s.png

代码如下：
Solve[{-6 lx^2 (x - Subscript[lx, 1])^2 +
    12 lx (x - Subscript[lx, 1])^2 Subscript[lx, 1] -
    4 x^3 Subscript[lx, 2] +
    12 lx (x - Subscript[lx, 1])^2 Subscript[lx, 2] + 4
\!\(\*SubsuperscriptBox[\(lx\), \(1\), \(3\)]\) Subscript[lx, 2] +
    2 lx^2
\!\(\*SubsuperscriptBox[\(lx\), \(2\), \(2\)]\) -
    4 lx Subscript[lx, 1]
\!\(\*SubsuperscriptBox[\(lx\), \(2\), \(2\)]\) + 6
\!\(\*SubsuperscriptBox[\(lx\), \(1\), \(2\)]\)
\!\(\*SubsuperscriptBox[\(lx\), \(2\), \(2\)]\) - 4 lx
\!\(\*SubsuperscriptBox[\(lx\), \(2\), \(3\)]\) + 4 Subscript[lx, 1]
\!\(\*SubsuperscriptBox[\(lx\), \(2\), \(3\)]\) +
\!\(\*SubsuperscriptBox[\(lx\), \(2\), \(4\)]\) == 0,
  0 < Subscript[lx, 1] < x < Subscript[lx, 1] + Subscript[lx, 2] <
   lx}, x, Reals]
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2016-01-07 17:27:38
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

青沙山

木虫 (小有名气)
送红花一朵
引用回帖:
4楼: Originally posted by xzczd at 2016-01-08 12:27:06
……好吧我忘了这茬了。总之你执行我给的代码前，先按Ctrl+Shift+N把代码转成StandardForm。

至于后一个，直接用中括号啊：

fx := (-qx)*f + Sum[ru*f[x - Sum]^0,
       {u, 1, i}]...

谢谢你！

Solve解出来有3个解，Reduce解出1个解，解出来的表达式好长！
好像Solve出来的结果仍然没有排除不符合条件的解……
学了3周Mathematica，依然搞不定我要的结果……
总之，非常感谢！
赞一下 回复此楼
5楼2016-01-08 20:05:53
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 8 个回答

xzczd

木虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★ ★
感谢参与，应助指数 +1
青沙山: 金币+5, ★★★很有帮助 2016-01-08 19:55:03
……下标害的。对现有代码而言最简单的改法是：
CODE:
<< Notation`

Symbolize[ParsedBoxWrapper[\(lx \_ _\)]](*这行用相应的面板输入会比较好看，具体看看帮助*)

Solve[{-6*lx^2*(x - Subscript[lx, 1])^2 +
    12*lx*(x - Subscript[lx, 1])^2*Subscript[lx, 1] - 4*x^3*Subscript[lx, 2] +
         12*lx*(x - Subscript[lx, 1])^2*Subscript[lx, 2] +
    4*Subscript[lx, 1]^3*Subscript[lx, 2] + 2*lx^2*Subscript[lx, 2]^2 -
         4*lx*Subscript[lx, 1]*Subscript[lx, 2]^2 +
    6*Subscript[lx, 1]^2*Subscript[lx, 2]^2 - 4*lx*Subscript[lx, 2]^3 +
         4*Subscript[lx, 1]*Subscript[lx, 2]^3 + Subscript[lx, 2]^4 == 0,
  0 < Subscript[lx, 1] < x < Subscript[lx, 1] + Subscript[lx, 2] < lx}, x, Reals]

至于为什么下标不好，解释起来字太多这里就用中文不重复了，有空看看这：http://mathematica.stackexchange.com/a/18395/1871
楼主实在理解不了就记住：没事别用下标。
赞一下(1人) 回复此楼

» 本帖已获得的红花（最新10朵）

青沙山
小木虫Mathematica版块已毁（当然原本也不咋的），建议大家前往百度贴吧或Stackexchange。
2楼2016-01-08 00:25:38
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

青沙山

木虫 (小有名气)
送红花一朵
引用回帖:
2楼: Originally posted by xzczd at 2016-01-08 00:25:38
……下标害的。对现有代码而言最简单的改法是：

<< Notation`

Symbolize(*这行用相应的面板输入会比较好看，具体看看帮助*)

Solve


至于为什么下标不好，解释起来字太多这里就用中文不重复了，有 ...

谢谢，小白表示仍然不懂呢！

如下图：
Mathematica中含参数的方程求解时如何自动舍去虚数解或不符合条件的解-1

第一行看不懂，能给个图吗？

若不用下标，请问还有什么方式表示一个参数序列呢？
尤其是我想对这个参数序列求和，如下例中定义的函数：
Mathematica中含参数的方程求解时如何自动舍去虚数解或不符合条件的解-2

fx[x_, i_] := -qx*f[x] + \!\(
\*UnderoverscriptBox[\(\[Sum]\), \(u = 1\), \(i\)]\((
\*SubscriptBox[\(rx\), \(u\)]*
\*SuperscriptBox[\(f[x -
\*UnderoverscriptBox[\(\[Sum]\), \(v = 1\), \(u\)]
\*SubscriptBox[\(lx\), \(v\)]]\), \(0\)])\)\)
赞一下 回复此楼
3楼2016-01-08 10:42:56
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xzczd

木虫 (小有名气)
引用回帖:
3楼: Originally posted by 青沙山 at 2016-01-08 10:42:56
谢谢，小白表示仍然不懂呢！

如下图：


第一行看不懂，能给个图吗？

若不用下标，请问还有什么方式表示一个参数序列呢？
尤其是我想对这个参数序列求和，如下例中定义的函数：


fx := -q ...

……好吧我忘了这茬了。总之你执行我给的代码前，先按Ctrl+Shift+N把代码转成StandardForm。

至于后一个，直接用中括号啊：
CODE:
fx[x_, i_] := (-qx)*f[x] + Sum[ru[u]*f[x - Sum[lv[v], {v, 1, u}]]^0,
       {u, 1, i}]
赞一下(1人) 回复此楼

» 本帖已获得的红花（最新10朵）

青沙山
小木虫Mathematica版块已毁（当然原本也不咋的），建议大家前往百度贴吧或Stackexchange。
4楼2016-01-08 12:27:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 8 个回答
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 化工学硕294分，求导师收留 +28 yzyzx 2026-04-12 31/1550 2026-04-14 11:09 by bianhd
[考研] 考研英一数一338分 +9 长江大学东校区 2026-04-13 10/500 2026-04-14 00:41 by 王珺璞
[考研] 0856专硕求调剂 希望是a区院校 +24 好好休息好不好 2026-04-09 27/1350 2026-04-13 22:22 by pies112
[考研] 求调剂 +11 何气正 2026-04-13 12/600 2026-04-13 20:14 by 学员JpLReM
[考研] 材料299专硕求调剂 +13 +21 2026-04-09 13/650 2026-04-13 14:16 by 张zhihao
[考研] 344 材料专业 求调剂211 无地域要求 +8 hualkop 2026-04-11 8/400 2026-04-12 22:24 by fqwang
[考研] 322求调剂 +6 123安康 2026-04-12 13/650 2026-04-12 15:51 by 123安康
[考研] 电气专硕320求调剂 +6 小麻子111 2026-04-10 6/300 2026-04-12 10:54 by lemon6009
[考研] 0854调剂 +12 长弓傲 2026-04-09 13/650 2026-04-12 09:56 by 逆水乘风
[考研] 331求调剂 +5 王国帅 2026-04-11 5/250 2026-04-11 22:56 by 溪涧流水
[考研] 11408。358求调剂 +3 TMYzds 2026-04-07 3/150 2026-04-11 17:10 by 氮气气气
[考研] 281求调剂 +11 觉得好的吧 2026-04-10 11/550 2026-04-11 09:35 by 逆水乘风
[考研] 一志愿矿大，材料工程专硕314分，0856可调都可以 +15 无懈可击的巨人 2026-04-09 15/750 2026-04-10 18:10 by hmn_wj
[考研] 初试261 +3 Asht少 2026-04-10 6/300 2026-04-10 16:38 by Asht少
[考研] 一志愿沪9，326生物学求相关专业调剂 +4 刘墨墨 2026-04-09 4/200 2026-04-10 12:07 by pengliang8036
[考研] 调剂申请086000一志愿西北农林科技大学生物与医药320分-本科齐鲁工业大学 +3 美美女士 2026-04-09 3/150 2026-04-10 10:31 by liuhuiying09
[考研] 085601初试330分找调剂 +10 流心奶黄包l 2026-04-09 10/500 2026-04-10 08:14 by Sammy2
[考研] 349学科化学045106求调剂，化学类都可以 +8 保好懂懂 2026-04-08 8/400 2026-04-09 14:03 by xulei3024
[考研] 招收有机化学、化工，药学，食品灯专业学生 +3 yrfhjgdj 2026-04-08 3/150 2026-04-09 10:15 by QYQX_123
[考研] 专硕085403，291分，有两篇专利，一国一奖 +3 哈吉咪哈吉咪 2026-04-07 3/150 2026-04-07 18:21 by 蓝云思雨
信息提示
关闭
请填处理意见
关闭