changed factor[[matches]] to factors[[matches]] to squish a bug.