R数据结构调整