菜鸟问题，用mathematica画个点

[中国小狼]

本人刚学mathematica想画个点。为什么没有显示。下面是我的程序，谢谢指导


Point2D[x_] := (g = Map[Point, x];
Graphics[g]);
g1 = Point2D[{0, 0}];

Show[g1];