Plot[x Sinh[0.3466 - 0.5 Ln[x]], {x, 0, 2}]