Parallelize[ Map[StreamPlot[#, {x, -3, 3}, {y, -3, 3}] &, Flatten[Table[ {x^i y^j, x^j y^i}, {i, 2}, {j, 2}], 1]]]