Please I need your help, I tried to plot a circular velocity in two axes x (vertical) and z (horizontal), but my command doesn't work, and I don't know how to solve this problem. The third column in the table is the velocity vector. and my command is below:
Thanks.
Clear["Global`*"]
x = {0.45254341649025254`, 0.45227213595499954`, 0.45198330013267035`,
0.45167298334620737`, 0.45133553390593273`, 0.45096227766016833`,
0.4505386127875258`, 0.4500360679774998`, 0.4493811388300842`,
0.44780000005820764`};
z = {0.3474811388300842`, 0.3481360679774998`, 0.34863861278752584`,
0.34906227766016834`, 0.34943553390593274`, 0.3497729833462074`,
0.35008330013267036`, 0.35037213595499955`, 0.35064341649025255`,
0.3509`};
vunorm = {{57.9788071463546`, -19.166212652256775`}, \
{81.03394791824775`, -39.73895181770351`}, {114.79422903836979`, \
-73.57340812814991`}, {171.99340744813645`, -137.74973493567225`}, \
{284.951139098033`, -280.5278617052729`}, {540.2152124825882`, \
-653.8652527355982`}, {879.3705744788631`, -1330.373054953457`}, \
{438.1205605214462`, -865.1393760715619`}, {110.68524219330115`, \
-321.5060519640343`}, {1.9719370785921555`, -81.17080143189594`}};
un = Table[{z[[i]], x[[i]], vunorm[[i]]}, {i, 1, Length[vunorm]}]
{{0.347481, 0.452543, {57.9788, -19.1662}}, {0.348136,
0.452272, {81.0339, -39.739}}, {0.348639,
0.451983, {114.794, -73.5734}}, {0.349062,
0.451673, {171.993, -137.75}}, {0.349436,
0.451336, {284.951, -280.528}}, {0.349773,
0.450962, {540.215, -653.865}}, {0.350083,
0.450539, {879.371, -1330.37}}, {0.350372,
0.450036, {438.121, -865.139}}, {0.350643,
0.449381, {110.685, -321.506}}, {0.3509,
0.4478, {1.97194, -81.1708}}}
vv = ListVectorPlot[un, VectorScale -> Small, VectorPoints -> {20, 20}]
ListVectorPlot[{{0.347481, 0.452543, {57.9788, -19.1662}}, {0.348136,
0.452272, {81.0339, -39.739}}, {0.348639,
0.451983, {114.794, -73.5734}}, {0.349062,
0.451673, {171.993, -137.75}}, {0.349436,
0.451336, {284.951, -280.528}}, {0.349773,
0.450962, {540.215, -653.865}}, {0.350083,
0.450539, {879.371, -1330.37}}, {0.350372,
0.450036, {438.121, -865.139}}, {0.350643,
0.449381, {110.685, -321.506}}, {0.3509,
0.4478, {1.97194, -81.1708}}}, VectorScale -> Small,
VectorPoints -> {20, 20}]
vv = VectorPlot[un, VectorScale -> Small, VectorPoints -> {20, 20}]enter code here