Plot[{10000/x, 12000/x}, {x, 0, 6000}]