Data.Frame重排：抽象代码

Question

我尝试为我的闪亮应用程序重新排列data.frame，但我无法找到如何编写足够抽象的代码以便在任何情况下都有效。

我当前的data.frame看起来像：

Row Names         | Col1   | Col2   | Col3
----------------- | ------ | ------ | ------
Company A: lvl:1  | number | number | number
Company B: lvl:1  | number | number | number
Company C: lvl:1  | number | number | number
Company A: lvl:2  | number | number | number
Company B: lvl:2  | number | number | number
Company C: lvl:2  | number | number | number
Company A: lvl:3  | number | number | number
Company B: lvl:3  | number | number | number
Company C: lvl:3  | number | number | number

列号以前缀为前缀，但级别由input$levels确定。

我尝试将data.frame格式更改为：

Row Names  | Col1   | Col2.1 | Col2.2 | Col2.3 | Col3.1 | Col3.2 | Col3.3
---------- | ------ | ------ | ------ | ------ | ------ | ------ | ------
Company A  | number | number | number | number | number | number | number 
Company B  | number | number | number | number | number | number | number
Company C  | number | number | number | number | number | number | number

.1 , .2 , .3对应lvl:1 , lvl:2 , lvl:3。我考虑过split()，但我无法弄清楚如何将其概括为足以适用于任何input$levels。