r语言选取部分数据