小编Mat*_*att的帖子

例:

string = "abc|3g"
function(string)
Solution: --> "abc" "3g"

有没有想法如何分割出示例中显示的方式？

例:

x <- c( 1, NA, 0, 1)
y <- c(NA, NA, 0, 1)
table(x,y, useNA="always") # --->
#       y
# x      0 1 <NA>
#   0    1 0    0
#   1    0 1    1
#  <NA>  0 0    1

我的问题是:

a <- c(NA, NA, NA, NA)
b <- c(1, 1, 1, 1)
table(a, b, useNA="always") ## --> It is 1X2 matrix. 
#       b
# a      1 <NA>
#   <NA> 4    0

我想获得一个3X3表,其中包含与上面示例相同的colnames,rownames和dimension.然后我将chisq.test应用于表.非常感谢您的回答!

如上面的截图所示,我在heatmap.2()这里使用了这个功能.

如何将颜色编码栏中的" 值 " 更改为任何其他名称？

可以使用gplots包中的数据:

 library(gplots)

 data(mtcars)

 x  <- as.matrix(mtcars)

 rc <- rainbow(nrow(x), start=0, end=.3)

 cc <- rainbow(ncol(x), start=0, end=.3)

 heatmap.2(x, key=TRUE)

非常感谢 :-)

可能重复:
如何使用R应用分层或k均值聚类分析？

考虑具有相同列数但行数不同的这四个矩阵

library(gtools)

m1 <- matrix(sample(c(-1, 0, 1), 15, replace=T), 3)
m2 <- matrix(sample(c(-1, 0, 1), 25, replace=T), 5)
m3 <- matrix(sample(c(-1, 0, 1), 25, replace=T), 5)
m4 <- matrix(sample(c(-1, 0, 1), 30, replace=T), 6)   
rownames(m1) <- c(1:3)
rownames(m2) <- c(4:8)
rownames(m3) <- c(9:13)
rownames(m4) <- c(14:19)

我想以hclust()下列格式排列时适用于这四个矩阵:

mat <- list(m1, m2, m3, m4)

unite <- rbind(m1,m2,m3, m4)
rownames(unite) <- c(1:19)
distUnite <- as.matrix(dist(unite, method="manhattan"))

## empty matrix for storing the distance between pairwise matrices
dist4m <- …