ggplot2 : 사용자 정의 y 제한이있는 geom_bar

Question

사용자 정의 y 제한과 함께 ggplot2 막대 그래프를 그려야합니다.

Type <- LETTERS[1:5] 
Y <- c(99, 99.5, 99.0, 98.8, 98.5) 

df <- data.frame(Type, Y) 

다음 코드는 막대 차트 잘 작동 :

library(ggplot2) 
ggplot(data = df, mapping = aes(x = Type, y = Y, fill = Type)) + 
    geom_bar(stat = "identity") + 
    theme_bw() 

을하지만, 나는 Y 제한을 설정할 수 없습니다입니다. 아래 코드를 참조하십시오.

ggplot(data = df, mapping = aes(x = Type, y = Y, fill = Type)) + 
    geom_bar(stat = "identity") + 
    scale_y_continuous(limits = c(90, 100)) + 
    theme_bw() 

ggplot(data = df, mapping = aes(x = Type, y = Y, fill = Type)) + 
    geom_bar(stat = "identity") + 
    ylim(90, 100) + 
    theme_bw() 

편집은

나는이 문제가 stat = "identity" 때문이다 같아요.

는

Answer 1

geom_rect() 대신 geom_bar()의 사용 해결책 :

# Generate data 
Type <- LETTERS[1:5] 
Y <- c(99, 99.5, 99.0, 98.8, 98.5) 
df <- data.frame(Type, Y) 

# Plot data 
library(ggplot2) 
ggplot() + 
    geom_rect(data = df, 
       aes(xmin = as.numeric(Type) - 0.3, 
        xmax = as.numeric(Type) + 0.3, 
        ymin = 90, ymax = Y, 
        fill = Type)) + 
    scale_x_continuous(label = df$Type, breaks = 1:nrow(df)) 

geom_rect()에서 X가 지정은 as.numeric(X) -/+ value로 좌표; ymin은 원하는 하한값으로 조정되고 ymax은 실제 Y 값으로 조정됩니다. coord_cartesian를 사용

Answer 2

대체 :

ggplot(data = df, mapping = aes(x = Type, y = Y, fill = Type)) + 
    geom_bar(stat = "identity") + 
    coord_cartesian(ylim = c(90, 100)) + 
    theme_bw() 

당신에게 제공합니다 :