WOLFRAM

Wolfram言語 ＆ システムドキュメントセンター

Rectangle[{xmin,ymin},{xmax,ymax}]

座標軸に平行な，{xmin,ymin}から{xmax,ymax}までの塗り潰された長方形を表す．

Rectangle[{xmin,ymin}]

左下のコーナーが{xmin,ymin}の単位正方形に相当する．

詳細とオプション
Details and Options Details and Options
例題  
例  
スコープ  
グラフィックス  
指定  
スタイリング  
座標  
領域  
オプション  
RoundingRadius  
アプリケーション  
特性と関係  
考えられる問題  
おもしろい例題  
関連項目
関連するガイド
履歴
引用書式

Rectangle

Rectangle[{xmin,ymin},{xmax,ymax}]

座標軸に平行な，{xmin,ymin}から{xmax,ymax}までの塗り潰された長方形を表す．

Rectangle[{xmin,ymin}]

左下のコーナーが{xmin,ymin}の単位正方形に相当する．

詳細とオプション

  • Rectangleは，幾何学領域として，またグラフィックスプリミティブとして使うことができる．
  • Rectangleは，領域を表す．
  • Rectangle[]はRectangle[{0,0}]に等しい． »
  • RectangleはGraphicsで使うことができる．
  • グラフィックスでは，点{xi,yi}は，Scaled，Offset，ImageScaled，Dynamicの各式でよい．
  • オプションRoundingRadius->r を使い，半径 r の円を使って描画される角丸を指定することができる．
  • グラフィックスの描画は，FaceForm，EdgeForm，色等の指示子の影響を受ける．
  • CanonicalizePolygonを使って長方形を明示的なPolygonオブジェクトに変換することができる．

例題

すべて開く すべて閉じる

例  (5)

単位正方形：

Wolfram Language code: Graphics[Rectangle[]]

2つの正方形：

Wolfram Language code: Graphics[{Red, Rectangle[{0, 0}], Blue, Rectangle[{0.5, 0.5}]}]

さまざまな長方形：

Wolfram Language code: Graphics[{Red, Rectangle[{0, 0}, {1, 3}], Blue, Rectangle[{2, 1}, {4, 2}]}]

さまざまにスタイル付けされた長方形：

Wolfram Language code: {Graphics[{Pink, Rectangle[]}], Graphics[{EdgeForm[Thick], Pink, Rectangle[]}], Graphics[{EdgeForm[Dashed], Pink, Rectangle[]}], Graphics[{EdgeForm[Directive[Thick, Dashed, Blue]], Pink, Rectangle[]}]}

面積と重心：

Wolfram Language code: Area[Rectangle[{x1, y1}, {x2, y2}]]
Wolfram Language code: RegionCentroid[Rectangle[{x1, y1}, {x2, y2}]]

スコープ  (17)

グラフィックス  (7)

指定  (3)

単位正方形：

Wolfram Language code: Graphics[Rectangle[{1, 1}]]

各軸に平行な長方形：

Wolfram Language code: Graphics[Rectangle[{0, 0}, {2, 1}]]

コーナーが原点にある単位立方体の短縮形：

Wolfram Language code: Graphics[Rectangle[], Frame -> True]

スタイリング  (1)

色指示子が長方形の面の色を指定する：

Wolfram Language code: Table[Graphics[{c, Rectangle[]}], {c, {Red, Green, Blue, Yellow}}]

FaceFormとEdgeFormを使って長方形の内部と境界のスタイルを指定することができる：

Wolfram Language code: Graphics[{FaceForm[Pink], EdgeForm[Directive[Thick, Dashed, Blue]], Rectangle[]}]

座標  (3)

スケールされた(Scaled)座標を使う：

Wolfram Language code: Graphics[Rectangle[Scaled[{0, .4}], Scaled[{1, .6}]], Frame -> True, PlotRange -> {{0, 10}, {0, 10}}]

画像がスケールされた(ImageScaled)座標を使う：

Wolfram Language code: Graphics[Rectangle[ImageScaled[{0, .4}], ImageScaled[{1, .6}]], Frame -> True, PlotRange -> {{0, 10}, {0, 10}}]

Offset座標を使う：

Wolfram Language code: Graphics[Rectangle[Offset[{10, 20}, {0, 0}], Offset[{-10, -20}, {1, 1}]], Frame -> True]

領域  (10)

埋込み次元：

Wolfram Language code: RegionEmbeddingDimension[Rectangle[{Subscript[x, min], Subscript[y, min]}, {Subscript[x, max], Subscript[y, max]}]]

幾何次元：

Wolfram Language code: RegionDimension[Rectangle[{Subscript[x, min], Subscript[y, min]}, {Subscript[x, max], Subscript[y, max]}]]

点の帰属判定：

Wolfram Language code: ℛ = Rectangle[{0, 0}];
Wolfram Language code: {RegionMember[ℛ, {0, 1}], RegionMember[ℛ, {0, 2}]}

点の帰属条件を求める：

Wolfram Language code: RegionMember[ℛ, {x, y}]

面積：

Wolfram Language code: ℛ = Rectangle[{0, 0}];
Wolfram Language code: {Area[ℛ], RegionMeasure[ℛ]}

重心：

Wolfram Language code: c = RegionCentroid[ℛ]
Wolfram Language code: Graphics[{{Pink, ℛ}, {Black, Point[c]}}]

点からの距離：

Wolfram Language code: ℛ = Rectangle[{-1, -1}, {1, 1}];
Wolfram Language code: {RegionDistance[ℛ, {2, 3}], RegionDistance[ℛ, {1, 0}]}

これをプロットする：

Wolfram Language code: {Plot3D[RegionDistance[ℛ, {x, y}], {x, -2, 2}, {y, -2, 2}, MeshFunctions -> {#3&}, Mesh -> 5, Exclusions -> Norm[{x, y}, ∞] == 1], ContourPlot[Evaluate@RegionDistance[ℛ, {x, y}], {x, -3, 3}, {y, -3, 3}, Contours -> {{0.5, Red}, {1, Green}, {1.5, Blue}}]}

点からの符号付き距離：

Wolfram Language code: ℛ = Rectangle[{-1, -1}, {1, 1}];
Wolfram Language code: {SignedRegionDistance[ℛ, {2, 3}], SignedRegionDistance[ℛ, {0, 0}]}

これをプロットする：

Wolfram Language code: Plot3D[SignedRegionDistance[ℛ, {x, y}], {x, -2, 2}, {y, -2, 2}, MeshFunctions -> {#3&}, Mesh -> {{0}}, MeshShading -> {Red, Green}, Exclusions -> Norm[{x, y}, ∞] == 1]

領域内の最近点：

Wolfram Language code: ℛ = Rectangle[{1, 2}, {3, 4}];
Wolfram Language code: RegionNearest[ℛ, {5, 6}]

最近点：

Wolfram Language code: pts = Table[{2, 3} + 4{Cos[k 2 π / 16], Sin[k 2π / 16]}, {k, 0., 15}]; nst = RegionNearest[ℛ, #]& /@ pts;
Wolfram Language code: Legended[Graphics[{{Gray, ℛ}, {Thin, Gray, Line[Transpose[{pts, nst}]]}, {Red, Point[pts]}, {Blue, Point[nst]}}], PointLegend[{Red, Blue}, {"start", "nearest"}]]

長方形は有界である：

Wolfram Language code: ℛ = Rectangle[{0, 0}, {1, 1}];
Wolfram Language code: BoundedRegionQ[ℛ]

境界を得る：

Wolfram Language code: rr = RegionBounds[ℛ]

長方形上で積分(Integrate)する：

Wolfram Language code: ℛ = Rectangle[{Subscript[x, min], Subscript[y, min]}, {Subscript[x, max], Subscript[y, max]}];
Wolfram Language code: Integrate[x y, {x, y}∈ℛ]

長方形上で最適化する：

Wolfram Language code: ℛ = Rectangle[{1, 2}, {3, 4}];
Wolfram Language code: Minimize[{x y - x, {x, y}∈ℛ}, {x, y}]

長方形内で方程式を解く：

Wolfram Language code: ℛ = Rectangle[{1, 2}, {3, 4}];
Wolfram Language code: Reduce[x^2 + y^2 == 7 && {x, y}∈ℛ, {x, y}]

オプション  (1)

RoundingRadius  (1)

角丸を使う：

Wolfram Language code: Graphics[Rectangle[{0, 0}, {2, 1}, RoundingRadius -> 0.3]]
Wolfram Language code: Table[Graphics[Rectangle[{0, 0}, {2, 1}, RoundingRadius -> m], PlotLabel -> m], {m, {0, .1, 2, .5}}]

アプリケーション  (6)

簡単な棒グラフ：

Wolfram Language code: data = RandomReal[{3, 10}, {10, 2}];
Wolfram Language code: Graphics[{EdgeForm[StandardGray], Blue, Table[{Blue, Rectangle[{i - .4, 0}, {i, data[[i, 1]]}], Red, Rectangle[{i + .4, 0}, {i, data[[i, 2]]}]}, {i, 10}]}, AspectRatio -> 1 / GoldenRatio, Frame -> True]

黄金の矩形：

Wolfram Language code: gr[0] := {{0, 0}, {1, -1}}; gr[n_] := Module[{ϕ = GoldenRatio, a, b, c, d}, {{a, b}, {c, d}} = gr[n - 1]; Switch[Mod[n, 4], 0, {{a, d}, {a + ϕ ^ -n, d - ϕ ^ -n}}, 1, {{c, d + ϕ ^ -n}, {c + ϕ ^ -n, d}}, 2, {{c - ϕ ^ -n, b + ϕ ^ -n}, {c, b}}, 3, {{a - ϕ ^ -n, b}, {a, b - ϕ ^ -n}}]];
Wolfram Language code: Graphics[{EdgeForm[Opacity[.5]], Table[{ColorData[24, k + 1], Rectangle@@gr[k]}, {k, 0, 8}]}]

四角い車輪：

Wolfram Language code: Animate[With[{q = Quotient[θ, π / 2], m = Mod[θ, π / 2]}, Graphics[{EdgeForm[Gray], LightGray, Rotate[Rectangle[{q, 0}], -m, {q + 1, 0}]}, Axes -> {True, False}, PlotRange -> {{-.5, 5.5}, {-0.5, 1.5}}, ImageSize -> 350]], {θ, 0, 2Pi}, AnimationRunning -> False, AnimationDirection -> ForwardBackward, DefaultDuration -> 2]

四角い車輪の軌道：

Wolfram Language code: Graphics[{EdgeForm[Gray], FaceForm[LightGray], Table[With[{q = Quotient[θ, π / 2], m = Mod[θ, π / 2]}, Rotate[Rectangle[{q, 0}], -m, {q + 1, 0}]], {θ, 0, 2Pi, Pi / 12}]}, Axes -> {True, False}, PlotRange -> {{-.5, 5.5}, {-0.5, 1.5}}, ImageSize -> 350]

辺の長さが等しいRectangleは正方形である：

Wolfram Language code: SquareRegion[{x_, y_}, r_] := Rectangle[{x, y}, {x + r, y + r}]
Wolfram Language code: SquareRegion[{1, 2}, 3]

これを可視化する：

Wolfram Language code: Region[%]

外周の長さが一定の長方形の面積を最大にする：

Wolfram Language code: r = Rectangle[{0, 0}, {x, y}]; Maximize[{Area[r], 2x + 2y == 4 && 0 < x && 0 < y}, {x, y}, Reals]

結果の長方形は正方形である：

Wolfram Language code: Region[r /. {x -> 1, y -> 1}]

これは，常に正方形である：

Wolfram Language code: Assuming[p > 0, Simplify[Maximize[{Area[r], 2x + 2y == p && 0 < x && 0 < y}, {x, y}, Reals]]]

特性と関係  (9)

Rotateを使って可能なすべての長方形を得る：

Wolfram Language code: Graphics[{Pink, Rotate[Rectangle[{0, 0}, {4, 3}], 30Degree]}, Frame -> True]

RectangleはCuboidの特殊ケースである：

Wolfram Language code: Subscript[ℛ, 1] = Cuboid[{0, 0}, {1, 1}]; Subscript[ℛ, 2] = Rectangle[{0, 0}, {1, 1}];
Wolfram Language code: RegionEqual[Subscript[ℛ, 1], Subscript[ℛ, 2]]

RectangleはParallelogramの特殊ケースである：

Wolfram Language code: Subscript[ℛ, 1] = Parallelogram[{0, 0}, {{1, 0}, {0, 1}}]; Subscript[ℛ, 2] = Rectangle[{0, 0}, {1, 1}];
Wolfram Language code: RegionEqual[Subscript[ℛ, 1], Subscript[ℛ, 2]]

RectangleはPolygonの特殊ケースである：

Wolfram Language code: Subscript[ℛ, 1] = Polygon[{{0, 0}, {1, 0}, {1, 1}, {0, 1}}]; Subscript[ℛ, 2] = Rectangle[{0, 0}, {1, 1}];
Wolfram Language code: RegionEqual[Subscript[ℛ, 1], Subscript[ℛ, 2]]

Rectangleは2つのTriangleオブジェクトの和集合である：

Wolfram Language code: Subscript[ℛ, 1] = Rectangle[{0, 0}, {1, 1}];
Wolfram Language code: t1 = Triangle[{{0, 0}, {1, 0}, {1, 1}}]; t2 = Triangle[{{1, 1}, {0, 1}, {0, 0}}]; Subscript[ℛ, 2] = RegionUnion[t1, t2];
Wolfram Language code: RegionEqual[Subscript[ℛ, 1], Subscript[ℛ, 2]]
Wolfram Language code: Region[Subscript[ℛ, 2]]

ImplicitRegionは任意のRectangle領域を表すことができる：

Wolfram Language code: Subscript[ℛ, 1] = ImplicitRegion[0 ≤ x ≤ 1 && 0 ≤ y ≤ 1, {x, y}]; Subscript[ℛ, 2] = Rectangle[{0, 0}, {1, 1}];
Wolfram Language code: RegionEqual[Subscript[ℛ, 1], Subscript[ℛ, 2]]

ParametricRegionは任意のRectangle領域を表すことができる：

Wolfram Language code: Subscript[ℛ, 1] = ParametricRegion[{u, v}, {{u, 0, 1}, {v, 0, 1}}]; Subscript[ℛ, 2] = Rectangle[{0, 0}, {1, 1}];
Wolfram Language code: RegionEqual[Subscript[ℛ, 1], Subscript[ℛ, 2]]

MeshRegionは任意のRectangle領域を表すことができる：

Wolfram Language code: MeshRegion[{{0, 0}, {1, 0}, {1, 1}, {0, 1}}, Polygon[{1, 2, 3, 4}]]
Wolfram Language code: RegionEqual[%, Rectangle[]]

BoundaryMeshRegionは任意のRectangle領域を表すことができる：

Wolfram Language code: BoundaryMeshRegion[{{0, 0}, {1, 0}, {1, 1}, {0, 1}}, Line[{1, 2, 3, 4, 1}]]
Wolfram Language code: RegionEqual[%, Rectangle[]]

考えられる問題  (1)

RoundingRadiusはGraphicsのみに影響する：

Wolfram Language code: RegionMeasure[Rectangle[{0, 0}, {1, 1}, RoundingRadius -> 1 / 3]]
Wolfram Language code: {DiscretizeGraphics[Rectangle[{0, 0}, {1, 1}, RoundingRadius -> 1 / 3]], Graphics[Rectangle[{0, 0}, {1, 1}, RoundingRadius -> 1 / 3]]}

おもしろい例題  (3)

ランダムな正方形の集合：

Wolfram Language code: Graphics[{EdgeForm[Black], Table[{Hue[RandomReal[]], Rotate[Rectangle[RandomReal[2, 2]], RandomReal[2Pi]]}, {20}]}]

色環：

Wolfram Language code: Animate[Graphics[{EdgeForm[Opacity[.5]], Table[{Hue[(t + k) / 20, 1, .9], Rotate[Rectangle[{1, -Sin[Pi / 20]}, {1 + 2Sin[Pi / 20], Sin[Pi / 20]}], 2Pi t / 20, {0, 0}]}, {t, 20}]}], {k, 1, 20}, AnimationRunning -> False]

デジタル花弁：

Wolfram Language code: Graphics[Table[{EdgeForm[Opacity[.6]], Hue[(-11 + q + 10 r) / 72], With[{t = 2Pi q / 12}, Rotate[Rectangle[(8 - r)({Cos[t], Sin[t]} - 1 / 4), (8 - r)({Cos[t], Sin[t]} + 1 / 4)], t + Pi / 4]]}, {r, 6}, {q, 12}]]
Wolfram Research (1988), Rectangle, Wolfram言語関数， https://reference.wolfram.com/language/ref/Rectangle.html （2019年に更新）.

テキスト

Wolfram Research (1988), Rectangle, Wolfram言語関数， https://reference.wolfram.com/language/ref/Rectangle.html （2019年に更新）.

CMS

Wolfram Language. 1988. "Rectangle." Wolfram Language & System Documentation Center. Wolfram Research. Last Modified 2019. https://reference.wolfram.com/language/ref/Rectangle.html.

APA

Wolfram Language. (1988). Rectangle. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/Rectangle.html

BibTeX

@misc{reference.wolfram_2026_rectangle, author="Wolfram Research", title="{Rectangle}", year="2019", howpublished="\url{https://reference.wolfram.com/language/ref/Rectangle.html}", note=[Accessed: 03-November-2026]}

BibLaTeX

@online{reference.wolfram_2026_rectangle, organization={Wolfram Research}, title={Rectangle}, year={2019}, url={https://reference.wolfram.com/language/ref/Rectangle.html}, note=[Accessed: 03-November-2026]}