点と線と円盤 座標と半径を以下のように定める
ten = Point[{5/2, 3/2}] ; sen = Line[{{0, -1}, {2, 2}, {3, 0}, {4, 1}}] ; enban = Disk[{1, 1/2}, 1/2] ; Show[Graphics[sen]] ;
Show[Graphics[{sen, enban, ten}, Frame -> True]] ;
以下, Pointsizeはディレクティといわれ点の大きさを指定する
Show[Graphics[{sen, enban, {PointSize[0.08], ten}}, Frame -> True]] ;0.08 の数値は上図の幅を1とした割合の時の点の半径を表す
Show[Graphics[{{Thickness[0.04], sen}, {GrayLevel[0.6],enban}, {PointSize[0.1], GrayLevel[0.], ten}}]] ;
Thicnessは線の幅をグラフの幅に対する割合で指定した .
GrayLevelは, グレイスケ - ルの指定で0が黒, 1 が白を表す.
Show[Graphics[{{Thicknes ... l[0.5], ten}}, AspectRatio -> Automatic, Frame -> True, Background -> GrayLevel[0.3]]] ;
Converted by Mathematica (February 23, 2004)