r - R: 2 軸チャート調整

Question

2 つの軸でチャットをプロットしようとしています。ここにコードがあり、プロットが添付されています。

私はそれに2つの調整をしなければなりません。

• ドットで線をプロットしたいのですが、ドットはバーの中央にある必要があります
• 右側の軸 (つまり、軸 (4)) の目盛りを調整すると、左側の軸 (つまり、軸 (2)) と整列する必要があります。

コード：

Region=c("North","South","East","West")
Sales=sample(500:1000,4)
Change=sample(1:10,4)/10
names(Sales)=Region
names(Change)=Region
barplot(Sales,ylim=c(0,1000))
par(new=T)
plot(Change,type="b",axes=F,ylim=c(0,1))
axis(4)
box()

よろしく、

シヴァジ

Answer 1

まず、バープロットをオブジェクトとして保存します。したがって、中間点の座標が得られます。次に、行を追加するには、関数も使用して、値を 1000lines()で乗算するだけです。次に、関数に対して値を指定し、1000 で割ったものと同じです。Changeaxis()at=labels=at=

x<-barplot(Sales,ylim=c(0,1000))
lines(x,Change*1000,type="b")
axis(4,at=seq(0,800,200),labels=seq(0,800,200)/1000)