matrix
test_matrix <- matrix(c(1,2,3,4,2,1,2,1,3,2,1,3,4,1,3,1), nrow=4)

matrix > data.frame
test_df = as.data.frame(test_matrix)
rownames(test_df) = paste("gene_", 1:4, sep="")
colnames(test_df) = paste("gene_", 1:4, sep="")

matrix > dist
as.dist(test_matrix)

data.frame > dist
as.dist(test_df)

dist > matrix
原来的自我距离统一转成0
as.matrix(as.dist(test_matrix))

dist > data.frame
原来的自我距离统一转成0
as.matrix(as.dist(test_df))

网友评论