Lucas-polytopic numbers
DefinitionLucas brackets for arbitrary real parameters#✓fully proved
For real numbers \(s\) and \(t\), this is the sequence of real numbers \(a_0, a_1, a_2, \dots\) defined by \(a_0 = 0\), \(a_1 = 1\) and \(a_{n+2} = s a_{n+1} + t a_n\) for every natural number \(n\).
No condition is imposed on \(s\) and \(t\).
def lucasBracketAux (s t : ℝ) : ℕ → ℝ
| 0 => 0
| 1 => 1
| n + 2 => s * lucasBracketAux s t (n + 1) + t * lucasBracketAux s t n
Used by 2
StructureNondegenerate Lucas parameters#✓fully proved
For real numbers \(s\) and \(t\), let \(\{n\}_{s,t}\) be the sequence of real numbers with \(\{0\}_{s,t} = 0\), \(\{1\}_{s,t} = 1\) and \(\{n+2\}_{s,t} = s\{n+1\}_{s,t} + t\{n\}_{s,t}\) for every natural number \(n\). Nondegenerate Lucas parameters are a pair of real numbers \((s, t)\) with \(s \ne 0\), \(t \ne 0\) and \(\{n\}_{s,t} \ne 0\) for every natural number \(n \ne 0\).
The last condition ensures that the \(s,t\)-factorials are nonzero, so quotients of them never divide by zero.
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
s : ℝ
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:39
t : ℝ
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:40
def lucasBracketAux (s t : ℝ) : ℕ → ℝ
| 0 => 0
| 1 => 1
| n + 2 => s * lucasBracketAux s t (n + 1) + t * lucasBracketAux s t n
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:30
Uses 1 · Used by 21
DefinitionLucas brackets#✓fully proved
For nondegenerate Lucas parameters \((s, t)\), the Lucas brackets are the real numbers \(\{n\}_{s,t}\), for natural numbers \(n\), defined by \(\{0\}_{s,t} = 0\), \(\{1\}_{s,t} = 1\) and \(\{n+2\}_{s,t} = s\{n+1\}_{s,t} + t\{n\}_{s,t}\) for every natural number \(n\).
def lucasBracket (P : LucasParameters) : ℕ → ℝ
| n => lucasBracketAux P.s P.t n
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
def lucasBracketAux (s t : ℝ) : ℕ → ℝ
| 0 => 0
| 1 => 1
| n + 2 => s * lucasBracketAux s t (n + 1) + t * lucasBracketAux s t n
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:30
Uses 2 · Used by 10
DefinitionFactorial of Lucas brackets#✓fully proved
For nondegenerate Lucas parameters \((s, t)\), write \(\{k\}_{s,t}\) for the \(k\)-th Lucas bracket. For a natural number \(n\), the \(s,t\)-factorial is the real number \(\{n\}_{s,t}! = \prod_{k=1}^{n} \{k\}_{s,t}\), the product of \(\{1\}_{s,t}, \dots, \{n\}_{s,t}\); for \(n = 0\) it is the empty product \(1\).
def lucasFactorial (P : LucasParameters) (n : ℕ) : ℝ :=
∏ k ∈ Finset.range n, lucasBracket P (k + 1)
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
def lucasBracket (P : LucasParameters) : ℕ → ℝ
| n => lucasBracketAux P.s P.t n
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:47
Uses 2 · Used by 2
DefinitionLucasnomial coefficients#✓fully proved
Let \((s, t)\) be nondegenerate Lucas parameters and write \(\{m\}_{s,t}!\) for the \(s,t\)-factorial of a natural number \(m\). For natural numbers \(n\) and \(k\), the Lucasnomial coefficient is the real number
when \(k \le n\), and \(\binom{n}{k}_{s,t} = 0\) when \(k > n\).
noncomputable def lucasnomial (P : LucasParameters) (n k : ℕ) : ℝ :=
if k ≤ n then lucasFactorial P n / (lucasFactorial P k * lucasFactorial P (n - k)) else 0
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
def lucasFactorial (P : LucasParameters) (n : ℕ) : ℝ :=
∏ k ∈ Finset.range n, lucasBracket P (k + 1)
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:55
Uses 2 · Used by 13
DefinitionSimplicial Lucas-polytopic numbers#✓fully proved
For nondegenerate Lucas parameters \((s, t)\) and natural numbers \(n\) and \(d\), the \(n\)-th simplicial \(d\)-Lucas-polytopic number is the Lucasnomial coefficient \(\binom{n+d-1}{d}_{s,t}\), where \(n + d - 1\) is read as \(0\) when \(n = d = 0\).
noncomputable def lucasPolytopicNumber (P : LucasParameters) (n d : ℕ) : ℝ :=
lucasnomial P (n + d - 1) d
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
noncomputable def lucasnomial (P : LucasParameters) (n k : ℕ) : ℝ :=
if k ≤ n then lucasFactorial P n / (lucasFactorial P k * lucasFactorial P (n - k)) else 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:67
Uses 2 · Used by 1
DefinitionLucas triangular numbers#✓fully proved
For nondegenerate Lucas parameters \((s, t)\) and a natural number \(n\), the \(n\)-th Lucas triangular number is the Lucasnomial coefficient \(\binom{n+1}{2}_{s,t}\).
noncomputable def lucasTriangularNumber (P : LucasParameters) (n : ℕ) : ℝ :=
lucasnomial P (n + 1) 2
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
noncomputable def lucasnomial (P : LucasParameters) (n k : ℕ) : ℝ :=
if k ≤ n then lucasFactorial P n / (lucasFactorial P k * lucasFactorial P (n - k)) else 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:67
Uses 2
DefinitionLucas tetrahedral numbers#✓fully proved
For nondegenerate Lucas parameters \((s, t)\) and a natural number \(n\), the \(n\)-th Lucas tetrahedral number is the Lucasnomial coefficient \(\binom{n+2}{3}_{s,t}\).
noncomputable def lucasTetrahedralNumber (P : LucasParameters) (n : ℕ) : ℝ :=
lucasnomial P (n + 2) 3
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
noncomputable def lucasnomial (P : LucasParameters) (n k : ℕ) : ℝ :=
if k ≤ n then lucasFactorial P n / (lucasFactorial P k * lucasFactorial P (n - k)) else 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:67
Uses 2
DefinitionLucas pentachoron numbers#✓fully proved
For nondegenerate Lucas parameters \((s, t)\) and a natural number \(n\), the \(n\)-th Lucas pentachoron number is the Lucasnomial coefficient \(\binom{n+3}{4}_{s,t}\).
noncomputable def lucasPentachoronNumber (P : LucasParameters) (n : ℕ) : ℝ :=
lucasnomial P (n + 3) 4
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
noncomputable def lucasnomial (P : LucasParameters) (n k : ℕ) : ℝ :=
if k ≤ n then lucasFactorial P n / (lucasFactorial P k * lucasFactorial P (n - k)) else 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:67
Uses 2
DefinitionLucas hexateron numbers#✓fully proved
For nondegenerate Lucas parameters \((s, t)\) and a natural number \(n\), the \(n\)-th Lucas hexateron number is the Lucasnomial coefficient \(\binom{n+4}{5}_{s,t}\).
noncomputable def lucasHexateronNumber (P : LucasParameters) (n : ℕ) : ℝ :=
lucasnomial P (n + 4) 5
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
noncomputable def lucasnomial (P : LucasParameters) (n k : ℕ) : ℝ :=
if k ≤ n then lucasFactorial P n / (lucasFactorial P k * lucasFactorial P (n - k)) else 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:67
Uses 2
TheoremSum formula for Lucasnomial coefficients#●ready to prove
Let \((s, t)\) be nondegenerate Lucas parameters, with Lucasnomial coefficients \(\binom{n}{k}_{s,t}\), and let \(\varphi\) and \(\varphi'\) be real numbers with \(\varphi + \varphi' = s\) and \(\varphi \varphi' = -t\). For all natural numbers \(n \ge 1\) and \(d\),
and the same holds with \(\varphi\) and \(\varphi'\) exchanged.
public theorem_wanted lucasnomial_succ_eq_sum_lucasPolytopic (P : LucasParameters) (φ φ' : ℝ)
(hsum : φ + φ' = P.s) (hprod : φ * φ' = -P.t) (n d : ℕ) (hn : 1 ≤ n) :
lucasnomial P (n + d) (d + 1) =
∑ k ∈ Finset.Icc 1 n, φ ^ ((d + 1) * (n - k)) * φ' ^ (k - 1) *
lucasnomial P (k + d - 1) d ∧
lucasnomial P (n + d) (d + 1) =
∑ k ∈ Finset.Icc 1 n, φ' ^ ((d + 1) * (n - k)) * φ ^ (k - 1) *
lucasnomial P (k + d - 1) d
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
noncomputable def lucasnomial (P : LucasParameters) (n k : ℕ) : ℝ :=
if k ≤ n then lucasFactorial P n / (lucasFactorial P k * lucasFactorial P (n - k)) else 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:67
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Theorem 2 (
jis-2025-25.5.6-thm-2).
Uses 2
TheoremIdentities for the Lucas triangular numbers#●ready to prove
Let \((s, t)\) be nondegenerate Lucas parameters and let \(\varphi, \varphi'\) be real numbers with \(\varphi + \varphi' = s\) and \(\varphi\varphi' = -t\); write \(\{n\}_{s,t}\) for the Lucas brackets and \(\binom{n}{k}_{s,t}\) for the Lucasnomial coefficients. Then \(\binom{n+1}{2}_{s,t} = t\binom{n}{2}_{s,t} + \{n\}_{s,t}^2\) and \(\binom{n+1}{2}_{s,t} = \sum_{k=1}^{n} t^{n-k}\{k\}_{s,t}^2\) for every natural number \(n\), and \(\varphi'^{n-1}\binom{n+1}{2}_{s,t} + \varphi^{n+1}\binom{n}{2}_{s,t} = \frac{\varphi^n + \varphi'^n}{\{2\}_{s,t}}\{n\}_{s,t}^2\) for every natural number \(n \ge 1\).
public theorem_wanted lucasTriangular_identities (P : LucasParameters) (φ φ' : ℝ)
(hsum : φ + φ' = P.s) (hprod : φ * φ' = -P.t) :
(∀ n : ℕ, lucasnomial P (n + 1) 2 = P.t * lucasnomial P n 2 + lucasBracket P n ^ 2) ∧
(∀ n : ℕ, 1 ≤ n →
φ' ^ (n - 1) * lucasnomial P (n + 1) 2 + φ ^ (n + 1) * lucasnomial P n 2 =
(φ ^ n + φ' ^ n) / lucasBracket P 2 * lucasBracket P n ^ 2) ∧
(∀ n : ℕ, lucasnomial P (n + 1) 2 =
∑ k ∈ Finset.Icc 1 n, P.t ^ (n - k) * lucasBracket P k ^ 2)
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
noncomputable def lucasnomial (P : LucasParameters) (n k : ℕ) : ℝ :=
if k ≤ n then lucasFactorial P n / (lucasFactorial P k * lucasFactorial P (n - k)) else 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:67
def lucasBracket (P : LucasParameters) : ℕ → ℝ
| n => lucasBracketAux P.s P.t n
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:47
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Theorem 3 (
jis-2025-25.5.6-thm-3).
Uses 3
TheoremWeighted difference of consecutive squared Lucas triangular numbers#●ready to prove
Let \((s, t)\) be nondegenerate Lucas parameters, with Lucas brackets \(\{n\}_{s,t}\) and Lucasnomial coefficients \(\binom{n}{k}_{s,t}\). For every natural number \(n\),
public theorem_wanted lucasTriangular_sq_sub_sq (P : LucasParameters) (n : ℕ) :
lucasnomial P (n + 2) 2 ^ 2 - P.t ^ 2 * lucasnomial P (n + 1) 2 ^ 2 =
(lucasBracket P (n + 2) + P.t * lucasBracket P n) / P.s * lucasBracket P (n + 1) ^ 3
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
noncomputable def lucasnomial (P : LucasParameters) (n k : ℕ) : ℝ :=
if k ≤ n then lucasFactorial P n / (lucasFactorial P k * lucasFactorial P (n - k)) else 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:67
def lucasBracket (P : LucasParameters) : ℕ → ℝ
| n => lucasBracketAux P.s P.t n
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:47
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Theorem 4 (
jis-2025-25.5.6-thm-4).
Uses 3
TheoremWeighted sum of cubes of Lucas brackets#●ready to prove
Let \((s, t)\) be nondegenerate Lucas parameters, with Lucas brackets \(\{n\}_{s,t}\) and Lucasnomial coefficients \(\binom{n}{k}_{s,t}\). For every natural number \(n\),
public theorem_wanted sum_cubes_eq_lucasTriangular_sq (P : LucasParameters) (n : ℕ) :
∑ k ∈ Finset.Icc 1 n, P.t ^ (2 * (n - k)) *
((lucasBracket P (k + 1) + P.t * lucasBracket P (k - 1)) / P.s) * lucasBracket P k ^ 3 =
lucasnomial P (n + 1) 2 ^ 2
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
def lucasBracket (P : LucasParameters) : ℕ → ℝ
| n => lucasBracketAux P.s P.t n
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:47
noncomputable def lucasnomial (P : LucasParameters) (n k : ℕ) : ℝ :=
if k ≤ n then lucasFactorial P n / (lucasFactorial P k * lucasFactorial P (n - k)) else 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:67
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Theorem 5 (
jis-2025-25.5.6-thm-5).
Uses 3
TheoremSum-of-cubes identities for Fibonacci, Pell, Jacobsthal and Mersenne numbers#●ready to prove
Let \(F_n\) be the Fibonacci numbers, \(P_n\) the Pell numbers, and \(J_n\) the Jacobsthal numbers, that is, the Lucas sequence \(U(1, -2)\), with \(J_0 = 0\), \(J_1 = 1\) and \(J_{n+2} = J_{n+1} + 2 J_n\). For every natural number \(n\),
and, for every real number \(q\) with \(q \ne 1\) and \(q \ne -1\) (Warnaar's identity),
The numbers \(2^k - 1\) are the Mersenne numbers, and the right side of the last identity is the square of the Gaussian binomial coefficient \(\binom{n+1}{2}_q\).
MetaMathlibExt.sum_cubes_specializations · 15 lines
public theorem_wanted sum_cubes_specializations (n : ℕ) :
∑ k ∈ Finset.Icc 1 n, (Nat.fib (k + 1) + Nat.fib (k - 1)) * Nat.fib k ^ 3 =
Nat.fib n ^ 2 * Nat.fib (n + 1) ^ 2 ∧
(∑ k ∈ Finset.Icc 1 n, ((pellNumber (k + 1) + pellNumber (k - 1)) * pellNumber k ^ 3 : ℚ)) =
1 / 2 * pellNumber n ^ 2 * pellNumber (n + 1) ^ 2 ∧
∑ k ∈ Finset.Icc 1 n, 4 ^ (n - k) *
(lucasU ⟨1, -2, by decide⟩ (k + 1) + 2 * lucasU ⟨1, -2, by decide⟩ (k - 1)) *
lucasU ⟨1, -2, by decide⟩ k ^ 3 =
lucasU ⟨1, -2, by decide⟩ n ^ 2 * lucasU ⟨1, -2, by decide⟩ (n + 1) ^ 2 ∧
(∑ k ∈ Finset.Icc 1 n, (4 ^ (n - k) * (2 ^ k + 1) * (2 ^ k - 1) ^ 3 : ℚ)) =
1 / 3 * (2 ^ n - 1) ^ 2 * (2 ^ (n + 1) - 1) ^ 2 ∧
∀ q : ℝ, q ≠ 1 → q ≠ -1 →
∑ k ∈ Finset.Icc 1 n, q ^ (2 * (n - k)) * ((1 - q ^ (2 * k)) / (1 - q ^ 2)) *
((1 - q ^ k) / (1 - q)) ^ 2 =
((1 - q ^ (n + 1)) * (1 - q ^ n) / ((1 - q) * (1 - q ^ 2))) ^ 2
def pellNumber : ℕ → ℕ
| 0 => 0
| 1 => 1
| n + 2 => 2 * pellNumber (n + 1) + pellNumber n
MathlibExt/NumberTheory/PellNumberSequence.lean:36
def lucasU (params : LucasSequenceParams) : ℕ → ℤ
| 0 => 0
| 1 => 1
| n + 2 => params.p * lucasU params (n + 1) - params.q * lucasU params n
MathlibExt/NumberTheory/LucasSequence.lean:50
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Corollary 6 (
jis-2025-25.5.6-cor-6).
Uses 3
TheoremRecurrence for the Lucas tetrahedral numbers#●ready to prove
Let \((s, t)\) be nondegenerate Lucas parameters, and write \(\{n\}_{s,t}\) for the Lucas brackets and \(\binom{n}{k}_{s,t}\) for the Lucasnomial coefficients. For every natural number \(n\),
public theorem_wanted lucasTetrahedral_recurrence (P : LucasParameters) (n : ℕ) :
lucasnomial P (n + 3) 3 =
P.s * P.t * lucasnomial P (n + 2) 3 + lucasBracket P (n + 1) * lucasnomial P (n + 2) 2
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
noncomputable def lucasnomial (P : LucasParameters) (n k : ℕ) : ℝ :=
if k ≤ n then lucasFactorial P n / (lucasFactorial P k * lucasFactorial P (n - k)) else 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:67
def lucasBracket (P : LucasParameters) : ℕ → ℝ
| n => lucasBracketAux P.s P.t n
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:47
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Theorem 7 (
jis-2025-25.5.6-thm-7).
Uses 3
DefinitionLucas derivative#✓fully proved
For real numbers \(\varphi\) and \(\varphi'\), the Lucas derivative \(D_{\varphi,\varphi'}\) sends a function \(f : \mathbb{R} \to \mathbb{R}\) to the function whose value at \(x \ne 0\) is \((f(\varphi x) - f(\varphi' x))/((\varphi - \varphi')x)\), read as \(0\) when \(\varphi = \varphi'\), and whose value at \(0\) is the derivative \(f'(0)\), read as \(0\) when \(f\) is not differentiable at \(0\).
In the paper \(\varphi \ne \varphi'\) are the roots of \(x^2 - sx - t\); its separate definition for \(s^2 + 4t = 0\) is not covered.
noncomputable def lucasDerivative (φ φ' : ℝ) (f : ℝ → ℝ) (x : ℝ) : ℝ :=
if x = 0 then deriv f 0 else (f (φ * x) - f (φ' * x)) / ((φ - φ') * x)
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Section 2 (definition of the Lucas-derivative).
TheoremThe Lucas derivative away from the origin#✓fully proved
For all real numbers \(\varphi\), \(\varphi'\) and \(x \ne 0\) and every function \(f : \mathbb{R} \to \mathbb{R}\), the Lucas derivative \(D_{\varphi,\varphi'}\) satisfies \(D_{\varphi,\varphi'} f(x) = (f(\varphi x) - f(\varphi' x))/((\varphi - \varphi')x)\), where the quotient is read as \(0\) when \(\varphi = \varphi'\).
theorem lucasDerivative_of_ne_zero (φ φ' : ℝ) (f : ℝ → ℝ) {x : ℝ} (hx : x ≠ 0) :
lucasDerivative φ φ' f x = (f (φ * x) - f (φ' * x)) / ((φ - φ') * x)
noncomputable def lucasDerivative (φ φ' : ℝ) (f : ℝ → ℝ) (x : ℝ) : ℝ :=
if x = 0 then deriv f 0 else (f (φ * x) - f (φ' * x)) / ((φ - φ') * x)
WantedExt/NumberTheory/LucasPolytopicNumberWanted.lean:141
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Section 2 (definition of the Lucas-derivative).
Uses 1 · Used by 1
TheoremThe Lucas derivative at the origin#✓fully proved
For all real numbers \(\varphi\), \(\varphi'\) and every function \(f : \mathbb{R} \to \mathbb{R}\), the Lucas derivative \(D_{\varphi,\varphi'}\) satisfies \(D_{\varphi,\varphi'} f(0) = f'(0)\), where \(f'(0)\) is read as \(0\) when \(f\) is not differentiable at \(0\).
theorem lucasDerivative_zero (φ φ' : ℝ) (f : ℝ → ℝ) :
lucasDerivative φ φ' f 0 = deriv f 0
noncomputable def lucasDerivative (φ φ' : ℝ) (f : ℝ → ℝ) (x : ℝ) : ℝ :=
if x = 0 then deriv f 0 else (f (φ * x) - f (φ' * x)) / ((φ - φ') * x)
WantedExt/NumberTheory/LucasPolytopicNumberWanted.lean:141
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Section 2 (definition of the Lucas-derivative).
Uses 1
TheoremThe Lucas derivative of the identity#✓fully proved
For distinct real numbers \(\varphi \ne \varphi'\), the Lucas derivative \(D_{\varphi,\varphi'}\) of the identity function \(y \mapsto y\) equals \(1\) at every real number \(x\).
theorem lucasDerivative_id {φ φ' : ℝ} (h : φ ≠ φ') (x : ℝ) :
lucasDerivative φ φ' (fun y => y) x = 1
noncomputable def lucasDerivative (φ φ' : ℝ) (f : ℝ → ℝ) (x : ℝ) : ℝ :=
if x = 0 then deriv f 0 else (f (φ * x) - f (φ' * x)) / ((φ - φ') * x)
WantedExt/NumberTheory/LucasPolytopicNumberWanted.lean:141
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Section 2 (definition of the Lucas-derivative).
Uses 2
TheoremIterated Lucas derivatives of \(1/(1 - x)\)#●ready to prove
Let \((s, t)\) be nondegenerate Lucas parameters, let \(\varphi \ne \varphi'\) be real numbers with \(\varphi + \varphi' = s\) and \(\varphi\varphi' = -t\), write \(D_{\varphi,\varphi'}\) for the Lucas derivative and \(\{n\}_{s,t}!\) for the \(s,t\)-factorial. For every natural number \(n\) and every real number \(x\) with \(\prod_{k=0}^{n} (1 - \varphi^{n-k}\varphi'^k x) \ne 0\), the \(n\)-fold iterate of \(D_{\varphi,\varphi'}\) applied to the function \(y \mapsto 1/(1 - y)\) has value at \(x\)
With \(q = \varphi'/\varphi\) the denominator is the \(q\)-Pochhammer symbol \((\varphi^n x; q)_{n+1}\) of the paper, which states the identity for \(n \ge 1\). Real distinct \(\varphi, \varphi'\) exist only when \(s^2 + 4t > 0\).
public theorem_wanted iterate_lucasDerivative_inv_one_sub (P : LucasParameters) (φ φ' : ℝ)
(hsum : φ + φ' = P.s) (hprod : φ * φ' = -P.t) (hne : φ ≠ φ') (n : ℕ) (x : ℝ)
(hx : ∏ k ∈ Finset.range (n + 1), (1 - φ ^ (n - k) * φ' ^ k * x) ≠ 0) :
(lucasDerivative φ φ')^[n] (fun y => 1 / (1 - y)) x =
lucasFactorial P n / ∏ k ∈ Finset.range (n + 1), (1 - φ ^ (n - k) * φ' ^ k * x)
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
noncomputable def lucasDerivative (φ φ' : ℝ) (f : ℝ → ℝ) (x : ℝ) : ℝ :=
if x = 0 then deriv f 0 else (f (φ * x) - f (φ' * x)) / ((φ - φ') * x)
WantedExt/NumberTheory/LucasPolytopicNumberWanted.lean:141
def lucasFactorial (P : LucasParameters) (n : ℕ) : ℝ :=
∏ k ∈ Finset.range n, lucasBracket P (k + 1)
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:55
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Theorem 8 (
jis-2025-25.5.6-thm-8).
Uses 3
TheoremGenerating function of the simplicial Lucas-polytopic numbers#●ready to prove
Let \((s, t)\) be nondegenerate Lucas parameters, let \(\varphi, \varphi'\) be real numbers with \(\varphi + \varphi' = s\) and \(\varphi\varphi' = -t\), let \(d\) be a natural number and write \(\binom{n}{k}_{s,t}\) for the Lucasnomial coefficients, so that the \(n\)-th simplicial \(d\)-Lucas-polytopic number is \(\binom{n+d-1}{d}_{s,t}\). Then, as formal power series in \(x\) with real coefficients,
This is the paper's identity \(\sum_{n \ge 1} \binom{n+d-1}{d}_{s,t} x^n = x/(\varphi^d x; q)_{d+1}\) with \(q = \varphi'/\varphi\) and the denominator cleared.
public theorem_wanted lucasPolytopic_generatingFunction (P : LucasParameters) (φ φ' : ℝ)
(hsum : φ + φ' = P.s) (hprod : φ * φ' = -P.t) (d : ℕ) :
PowerSeries.mk (fun n => if n = 0 then 0 else lucasPolytopicNumber P n d) *
∏ k ∈ Finset.range (d + 1), (1 - PowerSeries.C (φ ^ (d - k) * φ' ^ k) * PowerSeries.X) =
PowerSeries.X
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
noncomputable def lucasPolytopicNumber (P : LucasParameters) (n d : ℕ) : ℝ :=
lucasnomial P (n + d - 1) d
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:76
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Theorem 9 (
jis-2025-25.5.6-thm-9).
Uses 2
TheoremGenerating function of the squared Lucas triangular numbers#●ready to prove
Let \((s, t)\) be nondegenerate Lucas parameters, with Lucas brackets \(\{n\}_{s,t}\) and Lucasnomial coefficients \(\binom{n}{k}_{s,t}\), and let \(\varphi\) and \(\varphi'\) be real numbers with \(\varphi + \varphi' = s\) and \(\varphi \varphi' = -t\). Then, as formal power series in \(x\) with real coefficients,
This is the paper's quotient formula for \(\sum_{n \ge 1} \binom{n+1}{2}_{s,t}^{2} x^n\) with the denominator cleared; the paper writes the product over \(k\) as \((\varphi^4 x; q)_4\) with \(q = \varphi' / \varphi\).
public theorem_wanted lucasTriangular_sq_generatingFunction (P : LucasParameters) (φ φ' : ℝ)
(hsum : φ + φ' = P.s) (hprod : φ * φ' = -P.t) :
PowerSeries.mk (fun n => if n = 0 then 0 else lucasnomial P (n + 1) 2 ^ 2) *
((1 - PowerSeries.C (P.t ^ 2) * PowerSeries.X) *
(1 - PowerSeries.C (φ' ^ 4) * PowerSeries.X) *
∏ k ∈ Finset.range 4, (1 - PowerSeries.C (φ ^ (4 - k) * φ' ^ k) * PowerSeries.X)) =
PowerSeries.X +
PowerSeries.C (lucasBracket P 4 * φ - φ ^ 4) * PowerSeries.X ^ 2 -
PowerSeries.C (lucasBracket P 3 * φ ^ 3 * φ' ^ 3) * PowerSeries.X ^ 3 +
PowerSeries.C (lucasBracket P 3 * φ ^ 7 * φ' ^ 3 - lucasBracket P 4 * φ ^ 6 * φ' ^ 3) *
PowerSeries.X ^ 4
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
noncomputable def lucasnomial (P : LucasParameters) (n k : ℕ) : ℝ :=
if k ≤ n then lucasFactorial P n / (lucasFactorial P k * lucasFactorial P (n - k)) else 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:67
def lucasBracket (P : LucasParameters) : ℕ → ℝ
| n => lucasBracketAux P.s P.t n
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:47
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Theorem 10 (
jis-2025-25.5.6-thm-10).
Uses 3
TheoremEven-index Lucas-bracket series as Lambert series#●ready to prove
Let \((s, t)\) be nondegenerate Lucas parameters with \(s > 0\) and \(s^2 + 4t > 0\), write \(\{n\}_{s,t}\) for the Lucas brackets, let \(\varphi' = (s - \sqrt{s^2 + 4t})/2\) and let \(L(x) = \sum_{n \ge 1} x^n/(1 - x^n)\) be the Lambert series. Then the series \(\sum_{n \ge 1} t^n/\{2n\}_{s,t}\) converges absolutely, and its sum is \(\sqrt{s^2 + 4t}\,\bigl(L(\varphi'^2/t) - L(\varphi'^4/t^2)\bigr)\).
The hypotheses make \(\varphi'\) real with \(|\varphi'| < (s + \sqrt{s^2 + 4t})/2\), so both Lambert arguments lie in \((-1, 1)\).
public theorem_wanted hasSum_pow_div_lucasBracket_two_mul (P : LucasParameters) (hs : 0 < P.s)
(hdisc : 0 < P.s ^ 2 + 4 * P.t) :
HasSum (fun n : ℕ => P.t ^ (n + 1) / lucasBracket P (2 * (n + 1)))
(Real.sqrt (P.s ^ 2 + 4 * P.t) *
((∑' n : ℕ, (((P.s - Real.sqrt (P.s ^ 2 + 4 * P.t)) / 2) ^ 2 / P.t) ^ (n + 1) /
(1 - (((P.s - Real.sqrt (P.s ^ 2 + 4 * P.t)) / 2) ^ 2 / P.t) ^ (n + 1))) -
∑' n : ℕ, (((P.s - Real.sqrt (P.s ^ 2 + 4 * P.t)) / 2) ^ 4 / P.t ^ 2) ^ (n + 1) /
(1 - (((P.s - Real.sqrt (P.s ^ 2 + 4 * P.t)) / 2) ^ 4 / P.t ^ 2) ^ (n + 1))))
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
def lucasBracket (P : LucasParameters) : ℕ → ℝ
| n => lucasBracketAux P.s P.t n
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:47
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Theorem 11 (
jis-2025-25.5.6-thm-11).
Uses 2
TheoremSum of reciprocals of products of consecutive Lucas brackets#●ready to prove
Let \((s, t)\) be nondegenerate Lucas parameters with \(s > 0\), \(s^2 + 4t > 0\) and \(|t| > 1\), write \(\{n\}_{s,t}\) for the Lucas brackets and let \(\varphi = (s + \sqrt{s^2 + 4t})/2\). Then the series \(\sum_{n \ge 1} 1/(\{n\}_{s,t}\{n+1\}_{s,t})\) converges absolutely, and its sum is \(\varphi - (1 + t)\ln_{s,t}(1 + \varphi/t)\), where \(\ln_{s,t}(1 + \varphi/t) = -\sum_{n \ge 1} (-\varphi/t)^n/\{n\}_{s,t}\) is the Lucas logarithm.
The hypotheses \(s > 0\) and \(s^2 + 4t > 0\) make \(\varphi\) real with \(0 < |q| < 1\), where \(q = \varphi'/\varphi\) and \(\varphi' = (s - \sqrt{s^2 + 4t})/2\); and \(|t| > 1\) puts \(-\varphi/t\) in the paper's convergence range \((-|\varphi|, |\varphi|)\) of the Lucas logarithm. Without \(|t| > 1\) the logarithm series diverges: for \(s = t = 1\) its terms \((-\varphi)^n/F_n\), with \(F_n\) the Fibonacci numbers, do not tend to \(0\).
public theorem_wanted hasSum_inv_lucasBracket_mul_succ (P : LucasParameters) (hs : 0 < P.s)
(hdisc : 0 < P.s ^ 2 + 4 * P.t) (ht : 1 < |P.t|) :
HasSum (fun n : ℕ => 1 / (lucasBracket P (n + 1) * lucasBracket P (n + 2)))
((P.s + Real.sqrt (P.s ^ 2 + 4 * P.t)) / 2 -
(1 + P.t) * -∑' n : ℕ, (-((P.s + Real.sqrt (P.s ^ 2 + 4 * P.t)) / 2) / P.t) ^ (n + 1) /
lucasBracket P (n + 1))
structure LucasParameters where
s : ℝ
t : ℝ
s_ne_zero : s ≠ 0
t_ne_zero : t ≠ 0
bracket_ne_zero : ∀ n, n ≠ 0 → lucasBracketAux s t n ≠ 0
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:38
def lucasBracket (P : LucasParameters) : ℕ → ℝ
| n => lucasBracketAux P.s P.t n
MathlibExt/NumberTheory/LucasPolytopicNumber.lean:47
Sources
- Ronald Orozco López, Simplicial d-Polytopic Numbers Defined on Lucas Sequences, Journal of Integer Sequences 28 (2025), Article 25.5.6, Theorem 13 (
jis-2025-25.5.6-thm-13).
Uses 2
Loading dependency explorer…
The dependency explorer needs JavaScript and its graph data.