Update match_on.R

typo correction: "to" |--> "two".