打印方程表的结果

Question

修改

我试图在向量中的每个值组合上使用函数，并将结果保存到n x 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"))