R语言中pls包的yarn函数中的NIR是如何折叠的？

应该在r语言中如何操作，才能像这样将NIR矩阵折叠成NIR ：num[1:28, 1:268]的格式