这个问题用r如何实现?