Labfans是一个针对大学生、工程师和科研工作者的技术社区。 | 论坛首页 | 联系我们(Contact Us) |
![]() |
![]() |
#1 |
初级会员
注册日期: 2017-02-21
帖子: 1
声望力: 0 ![]() |
![]()
以下是我编的程序:
A= Table[ If[n == m, \[Tau]/(100* Pi), (Exp[-I (n - m)*\[Tau]/ 100])*(Sin[(n - m)*\[Tau]/100])/(Pi*(n - m))], {m, 1, 50}, {n, 1, 50}] // MatrixForm B = IdentityMatrix[50] // MatrixForm F = B - A G= Det[F] 最后要G对Tau的二阶导。谢谢各位! |
![]() |
![]() |