Plot[1 + Log[x]*(1^10) + ((Log[x])^2)*(1^17) + ((Log[x])^3)*(1^20) + ((Log[x])^4)*(1^22), {x, -1, -12}]

マセマティカでこのグラフをかきたいんですが
どうしても
a machine-size real number at x = -12..
みたいなエラーが出てきます。
どこが間違っていますでしょうか？