Mathematica计算一个一阶常微分方程出错了，请求各位大牛指点一下（用的是内置的NDsolve函数）

应该是初始值Beta【0】==1导致微分方程的分母为零。这种情况下该怎么办呢？

你这方程有问题，我用求通解的方式也解不出来

DSolve[{1 == f'[t] f[t] Log[f[t]], f[0] == 1}, f, t]

Solve::ifun: Solve 正在使用反函数，因此可能无法找到某些解；请使用 Reduce 来获取完整的解信息. >>

DSolve::bvfail: 对于通解的某些分支，无法求解条件. >>

DSolve::bvfail: 对于通解的某些分支，无法求解条件. >>

你该想办法把方程重新构造一下