Leading digits of Zipf () data follow Benford's law
ProvedZipfLaw.zipf_one_leadingDigit_benfordLet be a random rank drawn from the Zipf distribution with on , . For every digit , the probability that the leading decimal digit of equals tends to the Benford probability:
Formalization Note. The source's sentence does not say which numbers' leading digits are meant; this item reads it as the leading digits of the ranks when occurs with Zipf () frequency . (The other reading, the leading digits of the values for counted once each, is the reciprocal sequence, which does not satisfy Benford's law.)
import Mathlib import Definitions.Def_ZipfLaw_Defs
namespace ZipfLaw
theorem zipf_one_leadingDigit_benford (d : ℕ) (hd1 : 1 ≤ d) (hd9 : d ≤ 9) :
Filter.Tendsto
(fun N : ℕ => ∑ k ∈ (Finset.Icc 1 N).filter (fun k => leadingDigit k = d), zipfPMF N 1 k)
Filter.atTop (nhds (Real.logb 10 (1 + 1 / (d : ℝ)))) := by sorry
end ZipfLawRead-back
What the Lean code literally says, in plain math · Aristotle (Harmonic) - non-blind, same agent as the drafter
Non-blind read-back — not independent testimony. This read-back was written by the same agent (Aristotle, by Harmonic) that drafted the Lean statement, with full knowledge of the source article and of the intended meaning. It is not a blind audit by an independent reader, and no reviewer should treat it as one. Please compare it against the Lean code yourself.
For every natural with : as (naturals),
where (natural numbers) and for .
Confirmed by the mission captain (proposal self-audit).
Confirmed by the moderator at approval.