用R语言rep和seq写出1234523456345674567856789