R участок и баррель, как исправить илим не так?

Question

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

Теперь мне мешала странная проблема: тот же самый ylim выдает значения в разные оси. Рассмотрим следующий пример:

data(presidents) 
# shorten this series a bit 
pw <- window(presidents,start=c(1965)) 
barplot(t(pw),ylim = c(0,80)) 
par(new=T) 
plot(pw,ylim = c(0,80),col="blue",lwd=3) 

Я намеренно участок Y-оси, поступающие от обоих участков здесь, чтобы показать, что это не то же самое. Я знаю, что могу достичь намеченного результата, сначала построя график штриховки, а затем добавлю lines с использованием x и y аргументов lines.

Но я ищу гибкое решение, позволяющее вам добавлять строки в штриховые рисунки, например, вы добавляете линии к точкам или другим строкам. Итак, есть ли способ убедиться, что оси y одинаковы?

EDIT: также добавление параметра usr в пар не помогает мне здесь.

par(new=T,usr = par("usr")) 

Answer 1

Добавить yaxs="i" в свой lineplot. Например:

plot(pw,ylim = c(0,80),col="blue",lwd=3, yaxs="i") 

R стартовые штриховки при y = 0, в то время как линейные графики не будут. Это делается для того, чтобы убедиться, что вы видите строку, если бывает, что ваши данные y = 0, в противном случае она выравнивается с линией оси x.