讲的太含糊了，
如果只是一列点的话可以使用下面两行（Point[{a,b}] ----点[{横坐标，纵坐标}]）：
uu=Point[Table[{2,n},{n,-10,10}]]
Graphics[uu]
如果你是想画诸如(1,1),(1,2),(1,3),(1,4),(1,5)这样一系列横坐标相同的点的话，可以用ListPlot函数，例如ListPlot[{{1,1},{1,2},{1,3},{1,4}}]
如果想把这些点连起来，只要在后面加一个Joined->True命令选项，ListPlot[[{{1,1},{1,2},{1,3},{1,4}},Joined->True]
不过我没怎么看明白你的问题，只是按照我的理解给你回答的，希望能帮上忙吧，不行再具体问我^^
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ号：24596024