将数据帧转换为矩阵，sapply返回一个列表

Question

我想创建矩阵，其结果显示列之间的差异。我已经使用了spapply，它可以直观地返回正确的结果但是作为列表。我有一排DF。这都是数字。 示例数据：

|A| B|  C|
|12|6|  7|

我想返回

    A|  B|  C|
A|  0|  6|  5|
B|  6|  0|  1|
C|  5|  1|  0|

我试过了

 mymatrix<-sapply(DF, function(x) abs(x - DF))

这将返回一个看起来像矩阵的列表并提供正确的信息。我需要它作为矩阵而不是列表。