Franel numbers
DefinitionThe sequence A265233#✓fully proved
The sequence \((a_n)_{n \ge 0}\) of rational numbers is given by \(a_0 = 1\), \(a_1 = 1\), \(a_2 = 7\), \(a_3 = 56\) and, for every integer \(N \ge 4\),
def a265233 : ℕ → ℚ
| 0 => 1
| 1 => 1
| 2 => 7
| 3 => 56
| n + 4 =>
((19 * ((n : ℚ) + 4) ^ 2 - 19 * ((n : ℚ) + 4) + 6) *
a265233 (n + 3)
- 96 * ((n : ℚ) + 3) ^ 2 * a265233 (n + 2)
+ 144 * ((n : ℚ) + 3) * ((n : ℚ) + 2) *
a265233 (n + 1))
/ ((n : ℚ) + 4) ^ 2
Sources
- Juntao Jin, "An Explicit Formula and a Recurrence for OEIS A265233", Theorem 1(2).
TheoremExplicit formula for A265233 in terms of Franel numbers#●ready to prove
Let \((a_n)_{n \ge 0}\) be the sequence A265233 and let \(f_m = \sum_{k=0}^{m} \binom{m}{k}^3\) be the \(m\)-th Franel number. For every integer \(n \ge 1\),
theorem_wanted a265233_eq_sum_franel (n : ℕ) (hn : 1 ≤ n) :
a265233 n = (1 / 6) * ∑ m ∈ Finset.range (n + 1),
(Nat.choose n m : ℚ) * 4 ^ (n - m) *
(MetaMathlibExt.binomialPowerSeq 3 0 m : ℚ)
def a265233 : ℕ → ℚ
| 0 => 1
| 1 => 1
| 2 => 7
| 3 => 56
| n + 4 =>
((19 * ((n : ℚ) + 4) ^ 2 - 19 * ((n : ℚ) + 4) + 6) *
a265233 (n + 3)
- 96 * ((n : ℚ) + 3) ^ 2 * a265233 (n + 2)
+ 144 * ((n : ℚ) + 3) * ((n : ℚ) + 2) *
a265233 (n + 1))
/ ((n : ℚ) + 4) ^ 2
WantedExt/NumberTheory/OeisA265233Wanted.lean:61
def binomialPowerSeq (r s n : ℕ) : ℕ :=
∑ k ∈ Finset.range (n + 1),
(Nat.choose n k) ^ r * (Nat.choose (n + k) k) ^ s
MathlibExt/NumberTheory/ArithmeticFunction/BinomialPowerRealizability.lean:41
Sources
- Juntao Jin, "An Explicit Formula and a Recurrence for OEIS A265233", Theorem 1.
Uses 2
TheoremFranel numbers as diagonal coefficients#●ready to prove
For every natural number \(m\), the coefficient of \(x^m y^m z^m\) in the polynomial \(\bigl((x + y)(y + z)(z + x)\bigr)^m \in \mathbb{Q}[x, y, z]\) is the Franel number \(f_m = \sum_{k=0}^{m} \binom{m}{k}^3\).
theorem_wanted coeff_pow_eq_franel (m : ℕ) :
(((MvPolynomial.X 0 + MvPolynomial.X 1) *
(MvPolynomial.X 1 + MvPolynomial.X 2) *
(MvPolynomial.X 2 + MvPolynomial.X 0)) ^ m :
MvPolynomial (Fin 3) ℚ).coeff
(Finsupp.single (0 : Fin 3) m +
Finsupp.single (1 : Fin 3) m +
Finsupp.single (2 : Fin 3) m)
= (MetaMathlibExt.binomialPowerSeq 3 0 m : ℚ)
def binomialPowerSeq (r s n : ℕ) : ℕ :=
∑ k ∈ Finset.range (n + 1),
(Nat.choose n k) ^ r * (Nat.choose (n + k) k) ^ s
MathlibExt/NumberTheory/ArithmeticFunction/BinomialPowerRealizability.lean:41
Sources
- Juntao Jin, "An Explicit Formula and a Recurrence for OEIS A265233", Lemma 3.
Uses 1
TheoremGenerating function of A265233#●ready to prove
Let \((a_n)_{n \ge 0}\) be the sequence A265233 and let \({}_2F_1\) be the Gauss hypergeometric function. For every real number \(x\) with \(|x| < 1/12\) and \(|27x(1 - 4x)^2| < 1\),
theorem_wanted tsum_a265233_eq (x : ℝ) (hx : |x| < 1 / 12)
(hz : |27 * x * (1 - 4 * x) ^ 2| < 1) :
∑' n : ℕ, (a265233 n : ℝ) * x ^ n =
(ordinaryHypergeometric (1 / 3 : ℝ) (2 / 3 : ℝ) 1
(27 * x * (1 - 4 * x) ^ 2) + 5) / 6
def a265233 : ℕ → ℚ
| 0 => 1
| 1 => 1
| 2 => 7
| 3 => 56
| n + 4 =>
((19 * ((n : ℚ) + 4) ^ 2 - 19 * ((n : ℚ) + 4) + 6) *
a265233 (n + 3)
- 96 * ((n : ℚ) + 3) ^ 2 * a265233 (n + 2)
+ 144 * ((n : ℚ) + 3) * ((n : ℚ) + 2) *
a265233 (n + 1))
/ ((n : ℚ) + 4) ^ 2
WantedExt/NumberTheory/OeisA265233Wanted.lean:61
Sources
- Juntao Jin, "An Explicit Formula and a Recurrence for OEIS A265233", Corollary 2.
Uses 1
TheoremAsymptotics of A265233#●ready to prove
The sequence \((a_n)_{n \ge 0}\) A265233 satisfies
theorem_wanted a265233_isEquivalent :
Asymptotics.IsEquivalent Filter.atTop
(fun n : ℕ => (a265233 n : ℝ))
(fun n : ℕ => Real.sqrt 3 / (6 * Real.pi) * 12 ^ n / n)
def a265233 : ℕ → ℚ
| 0 => 1
| 1 => 1
| 2 => 7
| 3 => 56
| n + 4 =>
((19 * ((n : ℚ) + 4) ^ 2 - 19 * ((n : ℚ) + 4) + 6) *
a265233 (n + 3)
- 96 * ((n : ℚ) + 3) ^ 2 * a265233 (n + 2)
+ 144 * ((n : ℚ) + 3) * ((n : ℚ) + 2) *
a265233 (n + 1))
/ ((n : ℚ) + 4) ^ 2
WantedExt/NumberTheory/OeisA265233Wanted.lean:61
Sources
- Juntao Jin, "An Explicit Formula and a Recurrence for OEIS A265233", Corollary 2.
Uses 1
Loading dependency explorer…
The dependency explorer needs JavaScript and its graph data.