溫馨提示×
您好，登錄后才能下訂單哦！
點擊 登錄注冊 即表示同意《億速云用戶服務條款》
您好，登錄后才能下訂單哦！
本篇內容介紹了“R語言實例代碼分析”的有關知識，在實際案例的操作過程中，不少人都會遇到這樣的困境，接下來就讓小編帶領大家學習一下如何處理這些情況吧！希望大家仔細閱讀，能夠學有所成！
data <- read.csv("11.csv",header=T)
data <- as.matrix(data)
pdf("Number_of_cock_SNPs(M).pdf")
cols =c("royalblue2","yellow2")
par(fig=c(0.1,1,0,0.8))
barplot(data,col = cols,las=2,xlim=c(0,10),sub="Number of cock_SNPs(M)",horiz =TRUE,axis.lty = 1)
j=2.1
for (i in 2:14){
text(4,j,data[1,i],cex=0.9)
text(5,j,paste("(",round(data[1,i]/(data[1,i]+data[2,i]),2),"%",")",sep=""),cex=0.9)
j=j+1.17
}
j=2.1
par(fig=c(0.1,1,0.55,1),new=TRUE)
plot(data,axes=FALSE,col="white",ann=FALSE)
legend("bottom",cex=0.8,pch=c(15,15),col=c("royalblue2","yellow2"),
legend=c("Overlapped SNPs with chicken dbSNPs","Novel SNPs"))
dev.off()
“R語言實例代碼分析”的內容就介紹到這里了，感謝大家的閱讀。如果想了解更多行業相關的知識可以關注億速云網站，小編將為大家輸出更多高質量的實用文章！
免責聲明：本站發布的內容（圖片、視頻和文字）以原創、轉載和分享為主，文章觀點不代表本網站立場，如果涉及侵權請聯系站長郵箱：is@yisu.com進行舉報，并提供相關證據，一經查實，將立刻刪除涉嫌侵權內容。
