MatheMatica 5 画图技巧之三:改变图形大小.

使用:ImageSize -> {620, 448} option来实现，如下:

ListPlot[fg, PlotStyle -> {PointSize[.02], RGBColor[
1, 0, 0]}, PlotJoined -> False, AxesOrigin -> {0, 0}, AxesLabel -> {"号码
", "频率"}, PlotLabel -> "2006年号码频率图", Frame ->
True, ImageSize -> {620, 448}];