用Solve [expression，variable]函数无法求解变量

Question

我需要求解一个在3次指数中出现1个未知数的方程。一旦启动，Wolfram会保持“运行中...”，并且永远不会完成计算。

解决[51684.2 / 342077 * 0.048 / 0.148 * 26.09 / 22.19 ==   Exp [t / 26.09]-Exp [（22.19 t-26.09 t）/ 22.19 * 26.09]，t]

结果应该在10-100左右。

Answer 1

a = 51684.2/342077*0.048/0.148*26.09/22.19;
b = Exp[(22.19 t - 26.09 t)/22.19*26.09];
FindRoot[a == Exp[t/26.09] - b, {t, 0}]

{t -> 0.0128273}

或

NSolve[a == Exp[t/26.09] - b, t, Reals]