Maybe you want something like this:
StreamDensityPlot[{0, r x + x^3}, {r, -3, 3}, {x, -2, 2}, ColorFunctionScaling -> False, ColorFunction -> "TemperatureMap"]
which gives:
Regards -- Henrik
