在R中使用长到宽到长格式有困难

我试图制作一个类似于相关图的图表。然而，我的数据是长格式的，我只想显示矩阵的下三角。因此，我采用了我的数据，并使用以下方法对其进行了重塑：

x<-c('A','B','C')
data<-expand.grid(x,x)
data$value<-c(1,2,3,2,1,4,3,4,1)
r.data<-reshape(data, idvar = "Var1", timevar = "Var2", direction = "wide")
colnames(r.data)<-c('Var','A','B','C')
rownames(r.data)<-r.data$Var
r.data$Var<-NULL

---

一个选项是将矩阵转换为

matrix

，然后使用

na.rm=TRUE

选项将矩阵转换为

melt

library(reshape2)
melt(as.matrix(r.data_lower), na.rm = TRUE)

---

你能给我看看吗expected@akrun已更新以显示预期结果。

Var1  Var2   value
 A     A       1
 B     A       2
 B     B       1
 C     A       3
 C     B       4
 C     C       1

library(reshape2)
melt(as.matrix(r.data_lower), na.rm = TRUE)