Greater 
例題
すべて開く すべて閉じる例 (2)
スコープ (9)
数値不等式 (7)
I > 03 / 2 > 4 / 3二進法で最高でも最後の8桁しか違わない近似数は等しいとみなされる:
1. > 1. - 2 ^ 7 10 ^ -161. > 1. - 2 ^ 8 10 ^ -16N[Pi, 20] > PiN[Pi, 20] > Pi(1 - 2 ^ 8 10 ^ -20)2つの厳密な数式を比較する.不等式の証明には数値テストで十分なことがある:
E ^ Pi > Pi ^ ESqrt[2] + Sqrt[3] > Sqrt[5 + 2Sqrt[6]]Greaterで使われる数値メソッドと記号メソッドでは,この不等式が誤りであると証明するのには不十分である:
Sqrt[2] + Sqrt[3] > Root[# ^ 4 - 10# ^ 2 + 1&, 4]RootReduceを使って代数的数の符号を決定する:
RootReduce[%[[1]] - %[[2]]] > 0Greaterが使う数値メソッドは,この不等式を証明するのに十分な精度ではない:
Sqrt[2] + Sqrt[3] > Root[# ^ 4 - 10# ^ 2 + 1&, 4] - 10 ^ -100
RootReduceは厳密なメソッドを使ってこの不等式を証明する:
RootReduce[%[[1]] - %[[2]]] > 0$MaxExtraPrecisionの値を大きくすることによっても,この不等式が証明できるかもしれない:
Block[{$MaxExtraPrecision = 100}, Sqrt[2] + Sqrt[3] > Root[# ^ 4 - 10# ^ 2 + 1&, 4] - 10 ^ -100]記号不等式 (2)
x は実数ではないかもしれないので,記号不等式は未評価のまま残される:
x > xRefineを使い,x が実数であると仮定して不等式を再評価する:
Refine[%, Element[x, Reals]]ineq = x ^ 2 - y ^ 2 > 1Reduceを使って解集合の明示的な表示を求める:
Reduce[ineq, {x, y}]FindInstanceを使って解の例を求める:
FindInstance[ineq, {x, y}]Minimizeを使って,不等式で定義された領域での最適化を行う:
Minimize[{x ^ 2, ineq}, {x, y}]Refineを使って不等式で定義された仮定の下で簡約する:
Refine[Sqrt[(1 - x ^ 2) ^ 2], ineq]特性と関係 (12)
Not[x > y]3引数のGreaterの否定は自動的には簡約されない:
Not[x > y > z]LogicalExpandを使って,否定を2引数のLessEqualで表す:
LogicalExpand[%]これは,3引数のLessEqualとは等しくない:
LogicalExpand[x ≤ y ≤ z]Greaterが数式間の不等性が判断できない場合,不等式は未評価で返される:
a = Log[Sqrt[2] + Sqrt[3]];
b = Log[5 + 2Sqrt[6]] / 2;
a > bFullSimplifyは厳密な記号変換で不等式が正しくないことを証明する:
FullSimplify[%]Positive[x]は
と等価である:
Positive /@ {-1, 0, 1, I}Reduceを使って不等式を解く:
Reduce[x ^ 5 - 3x + 2 > 0, x]Reduce[y ^ 2 - 4x ^ 2 + 4x ^ 4 > 0, {x, y}]FindInstanceを使って解の例を求める:
FindInstance[y ^ 2 - 4x ^ 2 + 4x ^ 4 > z ^ 2, {x, y, z}]RegionPlotおよび RegionPlot3Dを使って不等式の解集合を可視化する:
RegionPlot[y ^ 2 - 4x ^ 2 + 4x ^ 4 > 0, {x, -1, 1}, {y, -1, 1}]RegionPlot3D[y ^ 2 - 4x ^ 2 + 4x ^ 4 > z ^ 2, {x, -1, 1}, {y, -1, 1}, {z, -1, 1}]Refine[Sqrt[x ^ 2], x > 0]Limit[a ^ n, n -> Infinity, Assumptions -> a > 1]MinimizeおよびMaximizeを使って不等式で制約された最適化問題を解く:
Minimize[{x - y, -y ^ 2 + 4x ^ 2 - 4x ^ 4 > 0}, {x, y}]NMinimizeおよびNMaximizeを使って制約条件付き最適化問題を数値的に解く:
NMinimize[{x - y, 2 > Tan[x] + Tan[y] > 1}, {x, y}]Integrate[x ^ 2 Boole[2 > x ^ 2 + y ^ 2 > 1], {x, -Infinity, Infinity}, {y, -Infinity, Infinity}]Median,Quantile,Quartilesを
番目の最大数に使う:
{x1, x2, x3} = {1, 2, 3};x3 > x2 > x1Median[{x2, x3, x1}]考えられる問題 (3)
2.00006 - 2.00005 > 0.000012.00006 - 2.00005//InputForm2.00006`16 - 2.00005`16 > 0.00001`16自動精度追跡機能のお陰で,Greaterは最初の10桁だけを見ればよいと分かっている:
Precision[2.00006`16 - 2.00005`16]2.6 - 2.5 > 0.1Greaterはこの場合の余分桁を無視する:
2.6 - 2.5//InputFormテクニカルノート
履歴
1988 で導入 (1.0) | 1996 で更新 (3.0)
テキスト
Wolfram Research (1988), Greater, Wolfram言語関数, https://reference.wolfram.com/language/ref/Greater.html (1996年に更新).
CMS
Wolfram Language. 1988. "Greater." Wolfram Language & System Documentation Center. Wolfram Research. Last Modified 1996. https://reference.wolfram.com/language/ref/Greater.html.
APA
Wolfram Language. (1988). Greater. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/Greater.html
BibTeX
@misc{reference.wolfram_2026_greater, author="Wolfram Research", title="{Greater}", year="1996", howpublished="\url{https://reference.wolfram.com/language/ref/Greater.html}", note=[Accessed: 06-November-2026]}
BibLaTeX
@online{reference.wolfram_2026_greater, organization={Wolfram Research}, title={Greater}, year={1996}, url={https://reference.wolfram.com/language/ref/Greater.html}, note=[Accessed: 06-November-2026]}