Hi,
Thank you for your response. Here is my code.
flowdata =
Import["/Users/pmb5727/Projects/Drop_wall/flowData.dat", "Table"];
Dimensions[flowdata]
flowfield =
Partition[#, 2] & /@
Table[{flowdata[[i, 1]], flowdata[[i, 2]], flowdata[[i, 3]],
flowdata[[i, 4]]}, {i, 1, Length[flowdata]}];
ListStreamPlot[flowfield, PlotLegends -> Placed[Automatic, Above],
PlotRange -> {{-2.0, 2.0}, {-1.5, 2}}, AspectRatio -> 3.5/4]
