Mathematica: FindRoot erreurs

FindRoot[
 27215. - 7.27596*10^-12 x + 52300. x^2 - 9977.4 Log[1. - 1. x] == 0
 , 
 {x, 0.000001}
]

converge vers la solution {x -> -0.0918521} mais comment puis-je obtenir Mathematica pour éviter le message d'erreur suivant avant la solution:

FindRoot::nlnum: The function value {Indeterminate} is not a list of numbers with dimensions {1} at {x} = {1.}. >>

Je suis en utilisant FindRoot pour résoudre certains assez salissante expressions. J'ai aussi parfois l'erreur suivante, bien que Mathematica rendement encore de réponse, mais je me demande si il existe un moyen de l'éviter:

FindRoot::lstol: The line search decreased the step size to within tolerance specified by AccuracyGoal and PrecisionGoal but was unable to find a sufficient decrease in the merit function. You may need more than MachinePrecision digits of working precision to meet these tolerances. >> 
Avez-vous essayé un autre point de départ?
Essayez Off[FindRoot::nlnum] 🙂
Ce n'est pas vraiment une solution, est-il? Regarde comme il n'y en a pas un (vrai) solution de l'équation. (Je ne sais pas pourquoi Mathematica vous donne une).
d'accord avec @Jefromi vous êtes l'obtention d'un numéro, mais il n'est pas une solution. Il ne semble pas être une réelle solution. Vous pouvez utiliser l'évaluation de surveiller et de suivre ce qui se passe et je pense que vous trouverez probablement sauvages oscillations jusqu'à ce qu'il crache ce numéro

OriginalL'auteur CaptanFunkyFresh | 2012-01-11