level 1
haozzº
楼主
pfun = ParametricNDSolveValue[{f[t] - t*f'[t] + a* D[(f[t])^3*
\!\(\*SuperscriptBox[\(f\),
TagBox[
RowBox[{"(", "3", ")"}],
Derivative],
MultilineFunction->None]\)[t], t] == 0, f[0] == 1, f'[0] == 0,
\!\(\*SuperscriptBox[\(f\),
TagBox[
RowBox[{"(", "3", ")"}],
Derivative],
MultilineFunction->None]\)[0] == 0, f''[100000] == 0},
f'[100000], {t, 0, 100000}, {a}]
y1 = pfun[1]
源程序如上，想利用ParametricNDSolveValue求边界值问题，为了找出f ‘ =1时的a值，原本边界条件为无穷这里设置为100000， 但运行后会发生错误，不知道是什么导致的？同样使用NDSOLVE也会有这样的错误。
错误如下：
2020年09月07日 09点09分
1
\!\(\*SuperscriptBox[\(f\),
TagBox[
RowBox[{"(", "3", ")"}],
Derivative],
MultilineFunction->None]\)[t], t] == 0, f[0] == 1, f'[0] == 0,
\!\(\*SuperscriptBox[\(f\),
TagBox[
RowBox[{"(", "3", ")"}],
Derivative],
MultilineFunction->None]\)[0] == 0, f''[100000] == 0},
f'[100000], {t, 0, 100000}, {a}]
y1 = pfun[1]
源程序如上，想利用ParametricNDSolveValue求边界值问题，为了找出f ‘ =1时的a值，原本边界条件为无穷这里设置为100000， 但运行后会发生错误，不知道是什么导致的？同样使用NDSOLVE也会有这样的错误。
错误如下：
