r语言提取某几行