Thanks for the suggestion but it did not change anything.
LogLogPlot[(2.5*(T/300)^-.4), {T, 100, 3000}, PlotTheme -> "Classic"]