pp = Table[{r Cos[[Phi]], r Sin[[Phi]]}, {r, 0, 10,
    0.5}, {[Phi], -[Pi]/6, [Pi]/6, 0.1}];
vv = Table[{{r Cos[[Phi]], r Sin[[Phi]]}, {1, 0}}, {r, 0, 10,
    0.5}, {[Phi], -[Pi]/6, [Pi]/6, 0.1}];
GraphicsRow[{ListPlot[pp], ListVectorPlot[vv]}][![enter image description here][1]][1]