방금 다음 논문 인 Gene Expression Data에서 상관 관계있는 Biclusters 찾기 에 대한 주장을 복제하려고합니다 .
법안 4. . 우리는 :
나는. 경우 첨가제 모델과 완벽한 bicluster는 다음 열에 대한 상관 관계와 완벽한 bicluster이다; ii. 경우 첨가제 모델과 완벽한 bicluster는 다음 X_ {IJ는} 행에 대한 상관 관계와 완벽한 bicluster이다; iii. R_I 와 C_J 가 모두 가산 모델을 가진 완벽한 biclusters라면 X_ {IJ} 는 완벽한 상관 bicluster입니다.
이러한 제안은 쉽게 입증 될 수 있습니다 ...
...하지만 물론 증명하지는 않습니다.
나는이 제안을 입증 할 수 있는지 확인하기 위해 종이 + 기본 + 사용자 정의 R 코드의 간단한 예제 중 일부를 사용하고 있습니다.
corbic <- matrix(c(0,4,-4,2,2,-2,6,0,4,-8,16,-2,-2,10,-14,4), ncol=4)
(표 1F부터)
논문에 설명 된대로 표준 X = svd 형식을 로 변환하는 일부 사용자 지정 코드 :
svdToRC <- function(x, ignoreRank = FALSE, r = length(x$d), zerothresh=1e-9) {
#convert standard SVD decomposed matrices UEV' to RC' form
#x -> output of svd(M)
#r -> rank of matrix (defaults to length of singular values vector)
# but really is the number of non-zero singular values
#ignoreRank -> return the full decomposition (ignore zero singular values)
#zerothresh -> how small is zero?
R <- with(x, t(t(u) * sqrt(d)))
C <- with(x, t(t(v) * sqrt(d)))
if (!ignoreRank) {
ind <- which(x$d >= zerothresh)
} else {
ind <- 1:r
}
return(list(R=as.matrix(R[,ind]), C=as.matrix(C[,ind])))
}
이 함수를 데이터 세트에 적용하십시오.
> svdToRC(svd(corbic))
$R
[,1] [,2]
[1,] 0.8727254 -0.9497284
[2,] -2.5789775 -1.1784221
[3,] 4.3244283 -0.7210346
[4,] -0.8531261 -1.0640752
$C
[,1] [,2]
[1,] -1.092343 -1.0037767
[2,] 1.223860 -0.9812343
[3,] 3.540063 -0.9586919
[4,] -3.408546 -1.0263191
환각을 일으키지 않는 한,이 매트릭스는 비록 피질이 행과 열 사이의 완벽한 상관 관계를 나타내더라도 부가 적이 지 않습니다. 그들이 제공하는 예제가 그들이 말한 속성을 나타내는 것이 이상하게 보입니다 ... 내가 svd 또는 post svd 변환 단계를 놓치지 않는 한?
4iii
말하지 P(R), P(C), additivity => P(X)
않습니까? (나는 " Y
완벽한 bicluster" 라고 약칭 한다 P(Y)
). 당신은 다른 방향으로 가고있는 것 같습니다. 다른 조건에서 그 중독성을 기대합니다. 더 설명 해주세요.
4iii
말을하지 않는 경우에 것을 X
있는 완벽 다음 bicluster 상관 관계 R
및 C
첨가제를 될 것입니다. 그 의미는 다른 방향으로 진행됩니다. 자, 그들이 제시 한 예가 옆에있는 정리와 혼동하지 않는 것이 이상하다는 데 동의합니다. 아마도 당신이 제공 할 수있는 다른 정보가 있습니까? 다른 방향으로 진행되는 다른 정리가 있습니까?