Mathematica解方程 我要Mathematica同时解一些方程，并显示出所有根 20
例如同时解x-1==0，x-2==0，x-3==0，x-4==0，x-5==0，x-6==0，x-7==0，x-8==0，x-9==0，要Mathematica显示出{1...
例如同时解x-1==0，x-2==0，x-3==0，x-4==0，x-5==0，x-6==0，x-7==0，x-8==0，x-9==0，要Mathematica显示出{1，2，3，4，5，6，7，8，9}，而不是当成方程组去解，然后显示无解
展开
展开全部
利用纯函数（Function，简写是#和&的结合）再加上Map（/@）就可以了啊：
Solve[#, x] & /@ {x - 1 == 0, x - 2 == 0, x - 3 == 0, x - 4 == 0, x - 5 == 0, x - 6 == 0, x - 7 == 0, x - 8 == 0, x - 9 == 0}
对于Map是什么意思，简单地说就是作用于列表的每一项，纯函数简单地说就是没有具体自变量名和应变量名、只有纯粹的函数关系的函数，具体请参看帮助文档。
Solve[#, x] & /@ {x - 1 == 0, x - 2 == 0, x - 3 == 0, x - 4 == 0, x - 5 == 0, x - 6 == 0, x - 7 == 0, x - 8 == 0, x - 9 == 0}
对于Map是什么意思，简单地说就是作用于列表的每一项，纯函数简单地说就是没有具体自变量名和应变量名、只有纯粹的函数关系的函数，具体请参看帮助文档。
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
