代碼提供了ggplot繪制所需的資料和函式,但是繪制出來的條形圖y軸不是等距的,看得我一頭霧水。請學者解答。
col1 <- c('SO','MO','EO','YO','RO')
col2 <- c('J','J','J','J','J',
'F','F','F','F','F',
'M','M','M','M','M',
'G','G','G','G','G')
col3 <- c('0.92966','0.94522','0.93311','0.995222',
'0.966463','0.975725','0.976464','0.9635321',
'0.980223','0.9124456','0.991678','0.973444',
'0.910789','0.922','0.993444','0.956555',
'0.923132','0.987222','0.900556','0.932228')
data <- data.frame(col1,col2,col3)
library(ggplot2)
ggplot(data, aes(x=col1, y=col3,fill=col2))
labs(x = "col1", y = "col3")
geom_bar(stat = 'identity', position=position_dodge())
scale_fill_discrete(
breaks = c("J","F","M",'G'))
theme(legend.title = element_text( size=12, face="bold"),
legend.text = element_text(size =12),
axis.title.x = element_text(size = 13, face="bold"),
axis.title.y = element_text(size = 13, face="bold"),
axis.text.x = element_text(size = 12, face="bold"),
axis.text.y = element_text(size = 12,face="bold"))
scale_x_discrete(limits = c('SO','MO','EO','YO','RO'))
如何繪制y軸范圍為0.9-1等間距的條形圖?
uj5u.com熱心網友回復:
您可以像這樣使用coord_cartesianwith來更改范圍:ylim
library(ggplot2)
ggplot(data, aes(x=col1, y=as.numeric(col3), fill=col2))
labs(x = "col1", y = "col3")
geom_bar(stat = 'identity', position=position_dodge())
scale_fill_discrete(
breaks = c("J","F","M",'G'))
theme(legend.title = element_text( size=12, face="bold"),
legend.text = element_text(size =12),
axis.title.x = element_text(size = 13, face="bold"),
axis.title.y = element_text(size = 13, face="bold"),
axis.text.x = element_text(size = 12, face="bold"),
axis.text.y = element_text(size = 12,face="bold"))
scale_x_discrete(limits = c('SO','MO','EO','YO','RO'))
coord_cartesian(ylim = c(0.9, 1))
scale_y_continuous(expand = c(0, 0))

創建于 2022-11-18,使用
如果你想在 y 軸上使用其他標記,你可以使用
scale_y_continuous(breaks = seq(0, 1, 0.1))
得到這個表示:

轉載請註明出處,本文鏈接:https://www.uj5u.com/net/536939.html
標籤:r图表2亚轴
