用Mathematica解线性方程组。
M={{1,-2,1,1},{1,-2,1,-1},{1,-2,1,-1}};b={1,-5,-5};LinearSolve[M,b]{-2,0,0,3}NullSpac...
M = {{1, -2, 1, 1}, {1, -2, 1, -1}, {1, -2, 1, -1}};
b = {1, -5, -5};
LinearSolve[M, b]
{-2, 0, 0, 3}
NullSpace[M]
{{-1, 0, 1, 0}, {2, 1, 0, 0}}
x = c %[[1]] = %%
Set::write: Tag Times in -2 c is Protected. >>
{1, -5, -5}
这样解有什么问题吗？结果总是不对啊。 展开
b = {1, -5, -5};
LinearSolve[M, b]
{-2, 0, 0, 3}
NullSpace[M]
{{-1, 0, 1, 0}, {2, 1, 0, 0}}
x = c %[[1]] = %%
Set::write: Tag Times in -2 c is Protected. >>
{1, -5, -5}
这样解有什么问题吗？结果总是不对啊。 展开
1个回答
展开全部
LinearSolve[M, b]
{-2, 0, 0, 3}
应该就是这样
{-2, 0, 0, 3}
应该就是这样
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
