I'm not sure I fully understand, but would this be along the lines of what you're looking for, except for the simplified parameter values and some arbitrary choice of range?
StreamPlot[{-b x y/n, b x y/n - k y} /. {b -> 3.4, k -> 3,
n -> 160}, {x, -100, 100}, {y, -100, 100}]