StreamDensityPlot[{y,-x},{x,-2,2},{y,-2,2},RegionFunction->Function[{x,y},0.55<x^2+y^2<4.2],ColorFunction->"RedBlueTones",Frame->False,StreamScale->Medium,ImageSize->Medium,LightingAngle->Automatic,BoundaryStyle->{Black,Thick}]