写出问题的r语言代码

写出问题的r语言代码