Управление непредсказуемым (по мне) поведением оси y с использованием gap.barplot()

Question

У меня есть баррель с разрывом оси y для 10 пар точек данных (матрица A). Я хочу точно такой же барплот, кроме подмножества только пяти из этих пар (матрица B). Но когда я рисую B, ось y, кажется, начинается не с 0, а при минимальном значении y в данных.

Я пробовал указать ylim = c (0,300), но он не ведет себя так, как ожидалось, при разрыве оси. У кого-нибудь есть рекомендации относительно наличия одинаковых диапазонов оси Y для участков А и В?

A <- rbind(NA, 
     c(7.31,8.13,0.44,60.50,8.51,19.25,10.50,25.86,296.64,44.86), 
     c(6.65,6.08,0.34,58.88,8.08,24.83,9.05,47.89,240.31,36.31)) 
B <- A[,c(4,6,8,9,10)] 

pA <- gap.barplot(A, 
      gap=c(65,230), 
      ytics=c(0,25,50,250,275,300), 
      xaxt='n') 

pB <- gap.barplot(B, 
      gap=c(65,230), 
      ytics=c(0,25,50,250,275,300), 
      xaxt='n') 

График пА

График рв

(Значения NA находятся там для интервала, между прочим)

Answer 1

Вы были на правильном пути, указав пределы y.

#loading package 
library(plotrix) 

pB <- gap.barplot(B, 
       gap=c(65,230), 
       ytics=c(0,25,50,250,275,300), 
       xaxt='n', 
       ylim=c(0,135)) 

I can't embed pictures in my posts yet, so here's a link to the plot made by this code.

This reference page for the gap.barplot function говорит, что

Если пользователь не запрашивает определенные у пределов, то функция будет вычислять пределы на основе диапазона значений данных. Если вы преодолеваете определенные пределы, помните, что вычесть отставание от верхнего предела.

Поскольку разрыв в barplot составляет от 65 до 230, вычитаем 165 (это 230 - 65) от верхнего предела, чтобы получить реальный верхний предел, 135. Другой способ смотреть на это является то, что вы хотите, чтобы ваш участок до 135 единиц (от 0 до 65, затем от 230 до 300), у-пределы будут ylim=c(0,135).

Просто добавьте ylim=c(0,135) к тому, что у вас уже есть для участка B, и вы в порядке.