DifferenceRootReduce[expr,n]
expr を n の関数として単一のDifferenceRootオブジェクトに簡約しようと試みる.
DifferenceRootReduce
DifferenceRootReduce[expr,n]
expr を n の関数として単一のDifferenceRootオブジェクトに簡約しようと試みる.
詳細とオプション
- DifferenceRootReduceは任意の式をDifferenceRootオブジェクトとして表そうと試みる.
- expr のDifferenceRootオブジェクトがゼロシーケンスに等しいとき,DifferenceRootReduce[expr,n]は常に厳密な0を返す.
- DifferenceRootReduceは方程式および不等式と同様にリストにも自動的に縫い込まれる.
- DifferenceRootReduce[f]は純関数あるいは純粋なDifferenceRootオブジェクトに作用する.
- DifferenceRootReduceは,以下のオプションを取る.
-
Assumptions $Assumptions パラメータについての仮定 Method Automatic 使用するメソッド
例題
すべて開く すべて閉じる例 (2)
フィボナッチ(Fibonacci)数列をDifferenceRootオブジェクトに簡約する:
DifferenceRootReduce[Fibonacci[k], k]Table[%, {k, 0, 10}]Table[Fibonacci[k], {k, 0, 10}]DifferenceRootReduce[Fibonacci[k + 1]Fibonacci[k - 1] - Fibonacci[k] ^ 2 == (-1) ^ k, k]スコープ (9)
DifferenceRootReduce[n ^ 2 + 1, n]DifferenceRootReduce[(n + 1) / (n - 1), n]DifferenceRootReduce[Binomial[2n, n], n]DifferenceRootReduce[2 ^ #&]DifferenceRootオブジェクトを検証する:
Table[DifferentialRoot[Function[{, }, {(-[])*Log[2] + Derivative[1][][] == 0,
[0] == 1}]][n], {n, 10}]DifferenceRootReduce[Fibonacci[n] + Exp[n], n]DifferenceRootReduce[Binomial[2n, n]Exp[n], n]DifferenceRootReduce[Fibonacci[2n + 1], n]DifferenceRootReduce[Fibonacci[n] - (-1) ^ n LucasL[2n + 1], n]DifferenceRootReduceは自動的にリストに縫い込まれる:
DifferenceRootReduce[{LucasL[n], n}, n]オプション (2)
Assumptions (1)
DifferenceRootReduceは,変数に関する仮定に応じて,異なる漸化式構造を生成できる:
expr = (-1)^Sqrt[n^2];DifferenceRootReduceは,一般の場合には式を未評価のままにする:
DifferenceRootReduce[expr, n]
という仮定の下では,DifferenceRootReduceはこの式に対する2階差分方程式を生成する:
DifferenceRootReduce[expr, n, Assumptions -> n ≥ 0]Method (1)
DifferenceRootReduceは非同次方程式を与えることがある:
DifferenceRootReduce[Fibonacci[n] + 1, n]オプションMethod->"Homogeneous"を使って同次方程式を得る:
DifferenceRootReduce[Fibonacci[n] + 1, n, Method -> "Homogeneous"]アプリケーション (3)
Fibonacciについての否定の公式を確認する:
DifferenceRootReduce[Fibonacci[-n] == (-1) ^ (n + 1) * Fibonacci[n], n]DifferenceRootReduce[Fibonacci[m + n] == 1 / 2(Fibonacci[m]LucasL[n] + LucasL[m]Fibonacci[n]), n]DifferenceRootReduce[Fibonacci[2n] == Fibonacci[n]LucasL[n], n]DifferenceRootReduce[Fibonacci[n + 1] == 1 / 2(Fibonacci[n] + LucasL[n]), n]DifferenceRootReduce[Fibonacci[n] == 1 / 5(LucasL[n - 1] + LucasL[n + 1]), n]HoldForm[Sum[Binomial[2m + 1, 2k]3 ^ k / (5 2 ^ m), {k, 0, m}]]DifferenceRootReduce[Sum[Binomial[2m + 1, 2k]3 ^ k / (5 2 ^ m), {k, 0, m}] /. m -> 3n + 1, n]Table[%, {n, 0, 10}]//SimplifyPadovanNumber = DifferenceRoot[Function[{y, n}, {-y[n] - y[1 + n] + y[3 + n] == 0, y[0] == 1, y[1] == 1, y[2] == 1}]]Table[PadovanNumber[n], {n, 0, 10}]DifferenceRootReduce[PadovanNumber[n] == PadovanNumber[n - 2] + PadovanNumber[n - 3], n]DifferenceRootReduce[PadovanNumber[n] == PadovanNumber[n - 4] + PadovanNumber[n - 5] + PadovanNumber[n - 6] + PadovanNumber[n - 7] + PadovanNumber[n - 8], n]DifferenceRootReduce[Sum[PadovanNumber[3k + 2], {k, 0, n}] == PadovanNumber[3n + 4] - 1, n]テキスト
Wolfram Research (2008), DifferenceRootReduce, Wolfram言語関数, https://reference.wolfram.com/language/ref/DifferenceRootReduce.html (2020年に更新).
CMS
Wolfram Language. 2008. "DifferenceRootReduce." Wolfram Language & System Documentation Center. Wolfram Research. Last Modified 2020. https://reference.wolfram.com/language/ref/DifferenceRootReduce.html.
APA
Wolfram Language. (2008). DifferenceRootReduce. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/DifferenceRootReduce.html
BibTeX
@misc{reference.wolfram_2026_differencerootreduce, author="Wolfram Research", title="{DifferenceRootReduce}", year="2020", howpublished="\url{https://reference.wolfram.com/language/ref/DifferenceRootReduce.html}", note=[Accessed: 06-September-2026]}
BibLaTeX
@online{reference.wolfram_2026_differencerootreduce, organization={Wolfram Research}, title={DifferenceRootReduce}, year={2020}, url={https://reference.wolfram.com/language/ref/DifferenceRootReduce.html}, note=[Accessed: 06-September-2026]}