如何从R中的数据帧创建3D数组?