溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

R語言怎么實現(xiàn)模擬表型數(shù)據(jù)

發(fā)布時間:2022-03-21 10:11:14 來源:億速云 閱讀:287 作者:iii 欄目:開發(fā)技術

這篇“R語言怎么實現(xiàn)模擬表型數(shù)據(jù)”文章的知識點大部分人都不太理解,所以小編給大家總結了以下內(nèi)容,內(nèi)容詳細,步驟清晰,具有一定的借鑒價值,希望大家閱讀完這篇文章能有所收獲,下面我們一起來看看這篇“R語言怎么實現(xiàn)模擬表型數(shù)據(jù)”文章吧。

GWAS根據(jù)遺傳率和QTL的數(shù)量產(chǎn)出模擬表型數(shù)據(jù)

#Read Soybean
Genotype data file
D<-read.big.matrix("GN.txt", type="char", sep="\t",head = TRUE)
dim(D)
D=D[,2:31261]
D1=as.data.frame(as.matrix(D))
D2=t(D1)
QTL <-100*(1:20) #pick 20 QTL
u <-rep(0,31620) #marker effects
u[QTL] <- 1
g <-as.vector(crossprod(D2,u))
h3 <- 0.6      #heritability 
y <- g +rnorm(346,mean=0,sd=sqrt((1-h3)/h3*var(g)))
#Saving simulated filewrite.table(y,"H60Q20.txt", sep="\t")

以上就是關于“R語言怎么實現(xiàn)模擬表型數(shù)據(jù)”這篇文章的內(nèi)容,相信大家都有了一定的了解,希望小編分享的內(nèi)容對大家有幫助,若想了解更多相關的知識內(nèi)容,請關注億速云行業(yè)資訊頻道。

向AI問一下細節(jié)

免責聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點不代表本網(wǎng)站立場,如果涉及侵權請聯(lián)系站長郵箱:is@yisu.com進行舉報,并提供相關證據(jù),一經(jīng)查實,將立刻刪除涉嫌侵權內(nèi)容。

AI