擴大可變數量的列在一個數據幀

Question

我有一個可以具有不同數量的列的數據幀，我需要之前下一個自動兩次擴大每一列出：

實施例：

df <- data.frame(a=1:10,b=2:11,c=3:12) 
df 

我試圖

dfexpand <- df[,rep(colnames(df),3)] 
dfexpand 

但是這給在這種情況下的順序列：

a b c a.1 b.1 c.1 a.2 b.2 c.2 

但我需要在這種情況下，順序爲：

a a.1 a.2 b b.1 b.2 c c.1 c.2 

Answer 1

使用each參數rep()：

dfexpand <- df[,rep(colnames(df),each=3)]