{a, b, K, A, S, P, \!\(TraditionalForm\`
\*SubscriptBox[\(c\), \(I\)]\), \!\(TraditionalForm\`
\*SubscriptBox[\(c\), \(u\)]\), Subscript[c, S], Subscript[c, T],
Subscript[c, 1], Subscript[c, E], h, \!\(TraditionalForm\`
\*SuperscriptBox[\(h\), \(\[Prime]\)]\), Subscript[h, R], Subscript[h,
E], X, DD, R, Subscript[t, T], m, \!\(TraditionalForm\`\[Rho]\)} =
{50000, 5, 100, 200, 100, 50, 0.5, 25, 20, 2, 5, 40, 5, 4, 6, 8,
175200, 50000, 50000, 0.01, 0.2, 0.02}
Subscript[Z, 1] =
P - Subscript[c, u] - Subscript[c,
I] - (1 - m) (Subscript[c, 1] + 2 Subscript[c, T] +
Derivative[1][h] Subscript[t, T]) \[Rho] +
Subscript[h, R] \[Rho] Subscript[t, T] + (
a[1 - \[Rho]] (h - Subscript[h, R]))/(3 b)
Subscript[Z, 2] = (Subscript[h, R] \[Rho]^2)/
R - \[Rho][h - Subscript[h, R]]/X - (
Derivative[1][h] (\[Rho]^2)[1 + m])/R
Subscript[Z, 3] = -Subscript[h, R]
Subscript[Z, 4] = -(K + (1 + m) (S + 2 A))
Subscript[Z, 5] = -(((h - Subscript[h, R]) (2 b[1 - \[Rho]]))/(6 b))
Subscript[Z, 6] = -(((h - Subscript[h, R]) a^2)/(3 b))
f[T_] = Sqrt[(a/b)^2 + (1 - \[Rho]) ((2 a T)/b + T^2)] - a/b
NMaximize[((2 a + b T)/2) Subscript[Z,
1] + (((2 a T + b T^2) (2 a + b T))/4) Subscript[Z,
2] + ((a T)/2 + (b T^2)/3) Subscript[Z, 3] + Subscript[Z, 4]/
T + (2 a + b T) f[T] Subscript[Z, 5] + f[T]/T Subscript[Z, 6], T]
最后一段代码运行出来我不清楚是什么原因,显示函数值太大了,大佬们怎么解决这个问题
\*SubscriptBox[\(c\), \(I\)]\), \!\(TraditionalForm\`
\*SubscriptBox[\(c\), \(u\)]\), Subscript[c, S], Subscript[c, T],
Subscript[c, 1], Subscript[c, E], h, \!\(TraditionalForm\`
\*SuperscriptBox[\(h\), \(\[Prime]\)]\), Subscript[h, R], Subscript[h,
E], X, DD, R, Subscript[t, T], m, \!\(TraditionalForm\`\[Rho]\)} =
{50000, 5, 100, 200, 100, 50, 0.5, 25, 20, 2, 5, 40, 5, 4, 6, 8,
175200, 50000, 50000, 0.01, 0.2, 0.02}
Subscript[Z, 1] =
P - Subscript[c, u] - Subscript[c,
I] - (1 - m) (Subscript[c, 1] + 2 Subscript[c, T] +
Derivative[1][h] Subscript[t, T]) \[Rho] +
Subscript[h, R] \[Rho] Subscript[t, T] + (
a[1 - \[Rho]] (h - Subscript[h, R]))/(3 b)
Subscript[Z, 2] = (Subscript[h, R] \[Rho]^2)/
R - \[Rho][h - Subscript[h, R]]/X - (
Derivative[1][h] (\[Rho]^2)[1 + m])/R
Subscript[Z, 3] = -Subscript[h, R]
Subscript[Z, 4] = -(K + (1 + m) (S + 2 A))
Subscript[Z, 5] = -(((h - Subscript[h, R]) (2 b[1 - \[Rho]]))/(6 b))
Subscript[Z, 6] = -(((h - Subscript[h, R]) a^2)/(3 b))
f[T_] = Sqrt[(a/b)^2 + (1 - \[Rho]) ((2 a T)/b + T^2)] - a/b
NMaximize[((2 a + b T)/2) Subscript[Z,
1] + (((2 a T + b T^2) (2 a + b T))/4) Subscript[Z,
2] + ((a T)/2 + (b T^2)/3) Subscript[Z, 3] + Subscript[Z, 4]/
T + (2 a + b T) f[T] Subscript[Z, 5] + f[T]/T Subscript[Z, 6], T]
最后一段代码运行出来我不清楚是什么原因,显示函数值太大了,大佬们怎么解决这个问题