我试图解决这个差异方程:
K[x_, x1_] := 1;
NDSolve[{A''[x] == Integrate[K[x, x1] A[x1], {x1, 0, 1}],
A[0] == 0, A'[1] == 1}, A[x], x]
我收到错误(Function::slotn和NDSolve::ndnum)
(它应该返回一个等于的数字函数3/16 x^2 + 5/8 x)
我正在寻找一种方法来解决这个微分方程:有没有办法以更好的形式编写它,这样NDSolve会理解它？是否有其他功能或包可以提供帮助？
注1:在我的完整问题中,K[x, x1]不是1 - 它取决于(以复杂的方式)on x和x1.
注2:x由于积分极限是确定的,因此无法推导出等式的两边是不行的.
似乎Mathematica不喜欢我引用一个点A[x]- 当我在做这个简化版本时会发生同样的错误:
NDSolve[{A''[x] == A[0.5], A[0] == 0, A'[1] == 1}, A[x], x]
(它应该返回一个等于的数字函数2/11 x^2 + 7/11 x)
在这种情况下,人们可以通过分析求解A''[x] == c,然后找到来避免这个问题c …