level 1
虚无权限
楼主
Parallelize[eqn = Piecewise[{{-\!\(
\*UnderoverscriptBox[\(\[Sum]\), \(g = p + x\),
SubscriptBox[\(p\), \(0\)]]\(2
\*SubscriptBox[\(K\), \(f\)]
\(\*SubscriptBox[\(N\), \(g\)]\)[t]\)\),
Subscript[p, 0] - x <= p <= Subscript[p, 0]}, {0,
x <= p <=
Subscript[p, 0] - x}, {+Subscript[K,
f]*(p - x + 1) Subscript[N, p][t], 0 <= p <= x - 1}}]
sol =
DSolve[Derivative[1][Subscript[N, p]][t] +
Subscript[K, f]*(p - x + 1) Subscript[N, p][t] - \!\(
\*UnderoverscriptBox[\(\[Sum]\), \(g = p + x\),
SubscriptBox[\(p\), \(0\)]]\(2
\*SubscriptBox[\(K\), \(f\)]
\(\*SubscriptBox[\(N\), \(g\)]\)[t]\)\) == eqn, Subscript[N, p][t],
t]]
2020年08月21日 02点08分
1
\*UnderoverscriptBox[\(\[Sum]\), \(g = p + x\),
SubscriptBox[\(p\), \(0\)]]\(2
\*SubscriptBox[\(K\), \(f\)]
\(\*SubscriptBox[\(N\), \(g\)]\)[t]\)\),
Subscript[p, 0] - x <= p <= Subscript[p, 0]}, {0,
x <= p <=
Subscript[p, 0] - x}, {+Subscript[K,
f]*(p - x + 1) Subscript[N, p][t], 0 <= p <= x - 1}}]
sol =
DSolve[Derivative[1][Subscript[N, p]][t] +
Subscript[K, f]*(p - x + 1) Subscript[N, p][t] - \!\(
\*UnderoverscriptBox[\(\[Sum]\), \(g = p + x\),
SubscriptBox[\(p\), \(0\)]]\(2
\*SubscriptBox[\(K\), \(f\)]
\(\*SubscriptBox[\(N\), \(g\)]\)[t]\)\) == eqn, Subscript[N, p][t],
t]]