在桌子上的文字？

Question

我有兩張桌子。兩者都使用read.table()函數進行讀取。

表1

A B C 
S1 1 1 0 
S2 2 0 NA 
S3 0 2 1 

表2

Pa Pb Pc 
G1 0.12 0.65 0.001 
G2 0.34 0.82 0.03 
G3 0.2 0.64 0.87 

我需要遍歷這兩個表上。具體來說，我需要逐列迭代表格，併爲特定列中的每個條目提取成對組合。

例如，

從第一列在表1，我需要提取在第1列的元素的所有成對排列的值，即，{1,2}，{1,0}， {2,0}，{2,1}，{0,1}，{0,2}。

使用這些值和表2中的元素（本例中元素[0,1]），我將擬合一階線性迴歸模型。

有沒有人有任何建議如何最好地迭代表一來隔離所有這些成對的排列？

Answer 1

對於第一個表柱獲得的組合，你可以這樣做：

apply(matrix(1:20, ncol=5), 2, combn, m=2) 

這將取決於你如何想最終的數據看。作爲列表可能更明智：

apply(matrix(1:20, ncol=5), 2, function(x) list(combn(x, m=2)))