附圖(曼哈頓圖)包含來自基因組和X軸的染色體位置-log(p),其中p是與點(變體)相關的p值,從那個特定的位置。 曼哈頓圖中的峯檢測
我已經使用下述R代碼來生成它(從間隙包):
require(gap)
affy <-c(40220, 41400, 33801, 32334, 32056, 31470, 25835, 27457, 22864, 28501, 26273,
24954, 19188, 15721, 14356, 15309, 11281, 14881, 6399, 12400, 7125, 6207)
CM <- cumsum(affy)
n.markers <- sum(affy)
n.chr <- length(affy)
test <- data.frame(chr=rep(1:n.chr,affy),pos=1:n.markers,p=runif(n.markers))
oldpar <- par()
par(cex=0.6)
colors <- c("red","blue","green","cyan","yellow","gray","magenta","red","blue","green", "cyan","yellow","gray","magenta","red","blue","green","cyan","yellow","gray","magenta","red")
mhtplot(test,control=mht.control(colors=colors),pch=19,bg=colors)
> head(test)
chr pos p
1 1 1 0.79296584
2 1 2 0.96675136
3 1 3 0.43870076
4 1 4 0.79825513
5 1 5 0.87554143
6 1 6 0.01207523
我對獲得高於某一閾值的曲線的峯的座標(-log (p))。
你是什麼意思的「過零」? – 2013-02-25 13:57:41
「峯值的一階導數在峯值最大處有一個向下的過零點」 - 從這裏開始:http://terpconnect.umd.edu/~toh/spectrum/PeakFindingandMeasurement.htm#findpeaks;我不確定我的理解是否正確 – agatha 2013-02-25 14:03:26
@agatha,這與您在[** biostars **](http://www.biostars.org/p/64416/#64558)上詢問的問題有何不同提供了一個答案..? – Arun 2013-02-25 14:34:22