Fit[{{1,40},{1000,1360},{10000,3480}}, {1, x, x^2, Log[x]}, x]