/- Copyright 2026 The Formal Conjectures Authors. Licensed under the Apache License, Version 2.0 (the "License"); you may not use this file except in compliance with the License. You may obtain a copy of the License at https://www.apache.org/licenses/LICENSE-2.0 Unless required by applicable law or agreed to in writing, software distributed under the License is distributed on an "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the License for the specific language governing permissions and limitations under the License. -/ import FormalConjecturesUtil

Determinants of 2 X 2 matrices of non-overlapping blocks of 4 consecutive primes

$a(n) = p_{4n-3}p_{4n} - p_{4n-2}p_{4n-1}$ where $p_k$ is the k-th prime number (1-indexed).

References:

namespace OeisA117027open Nat Int Filter

a n is the determinant of a 2x2 matrix of non-overlapping blocks of 4 consecutive primes.

noncomputable def a (n : ) : := if 0 < n then let k := 4 * n let pPrime (i : ) : := (Nat.nth Nat.Prime i : ) let p₁ := pPrime (k - 4) -- p_{4n-4} in 0-indexed Mathlib let p₂ := pPrime (k - 1) -- p_{4n-1} in 0-indexed Mathlib let p₃ := pPrime (k - 3) -- p_{4n-3} in 0-indexed Mathlib let p₄ := pPrime (k - 2) -- p_{4n-2} in 0-indexed Mathlib p₁ * p₂ - p₃ * p₄ else 0h1:Nat.Prime 13nth Nat.Prime 5 = 13 All goals completed! 🐙h1:Nat.Prime 17nth Nat.Prime 6 = 17 All goals completed! 🐙h1:Nat.Prime 19nth Nat.Prime 7 = 19 All goals completed! 🐙h1:Nat.Prime 23nth Nat.Prime 8 = 23 All goals completed! 🐙h1:Nat.Prime 29nth Nat.Prime 9 = 29 All goals completed! 🐙h1:Nat.Prime 31nth Nat.Prime 10 = 31 All goals completed! 🐙h1:Nat.Prime 37nth Nat.Prime 11 = 37 All goals completed! 🐙@[category test, AMS 11] theorem a_0 : a 0 = 0 := a 0 = 0 All goals completed! 🐙2 * 7 - 3 * 5 = -1 All goals completed! 🐙11 * 19 - 13 * 17 = -12 All goals completed! 🐙23 * 37 - 29 * 31 = -48 All goals completed! 🐙

The count of positive terms among $a(1)$, ..., $a(N)$.

noncomputable def positiveCount (N : ) : := (List.range N).countP (fun n => 0 < a (n + 1))

The count of negative terms among $a(1)$, ..., $a(N)$.

noncomputable def negativeCount (N : ) : := (List.range N).countP (fun n => a (n + 1) < 0)

The sequence of ratios $P(N)/Neg(N)$ as a sequence of real numbers.

noncomputable def ratioSeq (N : ) : := if negativeCount N = 0 then 0 else (positiveCount N : ) / (negativeCount N : )

This suggests the ratio is approaching a limit close to 0.87.

Formalized as: The sequence of ratios $P(N)/Neg(N)$ converges to a limit L, and L is in the interval (0.8, 0.9).

@[category research open, AMS 11] theorem conjecture : L : , Tendsto ratioSeq atTop (nhds L) 0.8 < L L < 0.9 := L, Tendsto ratioSeq atTop (nhds L) 0.8 < L L < 0.9 All goals completed! 🐙end OeisA117027