求助：实现几个未知量依次等1

ppomyz

例如  我有一串未知量 wzl:=[a1..an]
我想让这些未知量依次等1，其他的未知量等零
并且想放到一个函数里面，比如su[1]:={a1=1,a2到an全等于零}，su[2]:={a1=0,a2=1,a3到an全等于零}，依此类推
我之所以这么做，是因为我想提取一个方程组未知数的系数，我这个方程里面积分、微分都有
我的思路是提取未知量a1系数时，让a1=1，其余的未知量=0
用subs（su[1],eq1）来获得a1的系数
我的这些方程最后再组成一个大的方程组，想将未知量的系数最后编程写成一个矩阵，
哪位高手能帮帮我啊，谢谢

mathfan2008

用循环语句写个小程序，然后将得到的系数值赋值给矩阵项。

ppomyz

2# mathfan2008
你好，矩阵中的元素可以是等式吗？还有，变成矩阵后怎么可以用subs命令了吗？