바 plot의 원점을 변경하는 방법은 무엇입니까?

Question

음수 값을 가진 2 개의 데이터 세트가 있으므로 barplot은 막대가있는 플롯을 제공합니다. 막대를 얻으려면 음수 값으로 y 축의 원점을 설정하는 방법?

내가 무엇을 가지고 :

A <- c(-7.3, -2.17, 1.05) 
B <- c(-3.69, -5.04, -0.746) 
AB <- c(A, B) 

barplot(AB, col = c("darkgray","darkgray","darkgray","lightgray","lightgray","lightgray"),# 
    names.arg=c("A1", "A2", "A3", "B1", "B2", "B3")) 
legend("bottomright", legend = c("A", "B"), fill = c("darkgray", "lightgray"), horiz = T) 

내가 원하는 무엇 :

Answer 1

new <- abs(-8 - AB) 

barplot(new, beside=TRUE, ylim=c(0, 12), yaxt="n", 
    col = c("darkgray","darkgray","darkgray","lightgray","lightgray","lightgray"),# 
    names.arg=c("A1", "A2", "A3", "B1", "B2", "B3")) 

axis(2, seq(0, 12, 2), labels=seq(-8,4,2)) 
box(bty="l") 
legend("topright", legend = c("A", "B"), fill = c("darkgray", "lightgray"), horiz = T)