打印結果表

Question

編輯：

我想在矢量使用的值的每一個組合功能，並將結果保存到N×N的矩陣。我下面的描述並不簡單。由於@Deleet

我試圖打印功能的結果表，而不是作爲一個列表。有人可以解釋如何做到這一點一般？我在下面列出了我的具體情況。

df<-data.frame(
    c1=c(1,2,3), 
    c2=c(6,6,6), 
    c3=c(23,44,66) 
) 

temp<-NULL 
for(i in colnames(df)){ 
    for(j in colnames(df)){ 
     temp<-c(temp,paste0("function(i,j)_RESULT_HERE_FROM FUNCTION")) 
    } 
} 

目標：

c1   c2   c3 
c1 RESULT_HERE RESULT_HERE RESULT_HERE 
c2 RESULT_HERE RESULT_HERE RESULT_HERE 
c3 RESULT_HERE RESULT_HERE RESULT_HERE 

Answer 1

您可以嘗試outer

temp <- outer(colnames(df), colnames(df), 
     FUN=function(x,y) paste0(y, "!!", x, "!!", "RESULT_HERE"))