(* This is just a ploting example. The asymptotics id wrong! *)
LogPlot[{NIntegrate[Exp[-lambda*x-4/x^2], {x, 0, Infinity}], 2*Sqrt[Pi]/lambda^(2/3)*Exp[-3*lambda^(2/3)]}, {lambda, 3, 7}]