花花寫于2019.7.16 最近剛搬進人才公寓，各種采購和玩耍，非常開心，工作也開始步入正軌，慢慢安定下來，不知不覺斷更了一周，趕緊的補起來。。。
知識點ggplot2的默認配色分兩類，一類是連續(xù)型變量對應(yīng)的漸變色，一類是離散型變量對應(yīng)的獨立的幾種顏色。 數(shù)據(jù)(生信星球公眾號后臺回復(fù)color即可拿到示例數(shù)據(jù))
用于分類的列是class head(test)
# V1 patients class
# 1 1061 A 1
# 2 1548 A 2
# 3 2283 A 3
# 4 4756 A 4
# 5 1473 B 1
# 6 1760 B 2
table(test$class)
# 1 2 3 4
#10 10 10 10
做條形圖if(!require(ggplot2))install.packages('ggplot2')
library(ggplot2)
ggplot(data=test)+
geom_bar(aes(x=patients,y=V1,fill=class),stat = 'identity')
直接做出來的圖是這樣的：
顏色從深藍到淺藍漸變，是連續(xù)型變量對應(yīng)的顏色。驗證一下：str(test)
#'data.frame': 40 obs. of 3 variables:
# $ V1 : int 1061 1548 2283 4756 1473 1760 593 4062 722 435 ...
# $ patients: chr 'A' 'A' 'A' 'A' ...
# $ class : int 1 2 3 4 1 2 3 4 1 2 ...
不出所料，class這一列的數(shù)據(jù)類型是整型 實際上我們想要的是獨立的幾種顏色，那么對數(shù)據(jù)類型進行轉(zhuǎn)換是最直接的辦法。 test$class=as.character(test$class)
再次運行作圖代碼： ggplot(data=test)+
geom_bar(aes(x=patients,y=V1,fill=class),stat = 'identity')
 手動改顏色注意這里是fill，不是color，color是邊框。
顏色還可以手動修改，rgb顏色無數(shù)種任你選擇，比如這樣： ggplot(data=test)+
geom_bar(aes(x=patients,y=V1,fill=class),stat = 'identity')+
scale_fill_manual(values = c('#EEE685','#FFC1C1', '#D8BFD8', '#D1EEEE'))+
theme_bw()
|
