Help with Measure Numbers

[Karen Billings]

Hi all - I'm currently using Lilypond 2.22.1 to set some handbell music, and 
I'm encountering a problem with measure numbering.
I need all measures numbered in this score - for some reason, the first measure 
number in each line is being printed twice:


Working file is attached.
Thanks much!
Karen

% Version 1.0
% Last edit:  January 7, 2024
%
% The source code is covered by the Creative
% Commons Attribution-NonCommercial license,
% http://creativecommons.org/licenses/by-nc/2.5/
% Attribution:  Karen S. Billings CAGO
%


\version "2.22.1"
\include "english.ly"
ignore = \override NoteColumn.ignore-collision = ##t
\layout { indent = 0.0\cm }

\paper {
  #(define top-margin (* 0.5 in))
  #(define line-width (* 6.5 in))
  #(define bottom-margin (* 1.0 in))
  top-system-spacing.basic-distance = #10
  score-system-spacing.basic-distance = #10
  system-system-spacing.basic-distance = #17
  last-bottom-spacing.basic-distance = #10
  score-markup-spacing.basic-distance = #15
  ragged-bottom = ##t
}

% #(set-global-staff-size 24)

harmony = \chordmode {
  % Insert chords if needed
}
Melody = \relative c'' {
  \clef treble
  \key c \major
  \autoBeamOn
  \numericTimeSignature
  \time 4/4
  R1*4
  \bar "||" \break
  a4 a c c e, a a2
  c,4 e d c8 b a2 a2
  \bar "|."
}

Words = \lyricmode {
  _ _ _ _ _ _ _
}


UpperOne = \relative c'' {
  \clef treble
  \key c \major
  \numericTimeSignature
  \stemUp
  \time 4/4
  \repeat unfold 4 { <c a>4 <d b a> <e c a>2 }
  c4 b8 a b2 a1
  a8 b <c a>4 <b g>4 g a1
}

UpperTwo = \relative c' {
  \clef treble
  \key c \major
  \numericTimeSignature
  \stemDown
  \time 4/4
  \repeat unfold 4 { e8 e e e e2 }
  e8 e e4 d2
  c8 d e4 d2
  e8 f e4 d2
  <c e>4 d e2
}

LowerOne = \relative c' {
  \clef bass
  \key c \major
  \numericTimeSignature
  \time 4/4
  \stemUp
  a1 a a a
  a1 a a a
}
LowerTwo = {
  \clef bass
  \key c \major
  \numericTimeSignature
  \stemDown
  \time 4/4
}


\score {
    \context PianoStaff \with {
    \consists "Bar_number_engraver"
    barNumberVisibility = #(every-nth-bar-number-visible 1)
    \override BarNumber.break-visibility = #end-of-line-invisible
  }
  <<
%    \new ChordNames {
%      \set chordChanges = ##t
%      \harmony
%    }
    \new Staff
    \new Voice = "mel" \Melody
    \new Lyrics \lyricsto mel \Words
    \new PianoStaff <<
      \new Staff = "Upper"  <<
        \new Voice = "UpperOne" \UpperOne
        \new Voice = "UpperTwo" \UpperTwo
      >>
      \new Staff = "Lower" <<
        \new Voice = "LowerOne" \LowerOne
        \new Voice = "LowerTwo" \LowerTwo
      >>
    >>
  >>
  \layout {
    ragged-last = ##f
    ragged-right = ##f
    \context {
      \Lyrics
      \override LyricSpace #'minimum-distance = #0.8
      \override LyricText #'font-size = #+1.2
      \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1)
      \override VerticalAxisGroup.
      nonstaff-relatedstaff-spacing.padding = #1.5
      \override VerticalAxisGroup.
      nonstaff-unrelatedstaff-spacing.padding = #1.5
    }
  }
}