एक ही धुरी में दो तराजू

Question

मुझे यकीन नहीं है कि यह संभव है कि मैं क्या करना चाहता हूं। मैं नीचे की तस्वीर की तरह दो तराजू के साथ एक एक्स अक्ष खींचना चाहता हूँ। धन्यवाद एक बहुत,

Answer 1

ggplot2 संस्करण इस तरह देख सकते हैं:

library(ggplot2) 

x = c(1,2,3,4,5, 10,20,30,40,50) 
y = c(1,2,2,3,4, 2,1,3,5,5) 
# You should introduce cond - condition to separate axises - by yourself 
df = data.frame(x=x,y=y,cond=ifelse(x>5,"x2","x1")) 

ggplot(df, aes(x,y,group=cond)) + geom_line() + geom_point(aes(shape=cond), size=4) + facet_grid(.~cond, scales="free_x") 

कौन इस साजिश का उत्पादन:

Answer 2

मैं पूरी तरह यकीन नहीं है, लेकिन एक प्रारंभिक बिंदु के रूप में, ggplot2 में ?facet_grid() पर एक नज़र डालें।

पक्ष के साथ दो भूखंडों को प्राप्त करना बहुत मुश्किल नहीं होना चाहिए। तो आप शायद पूछें गूगल के बारे में axis.line = theme_blank()

गुड लक अक्ष बंद कर देते हैं और उसके बाद उपयुक्त तराजू

वापस जोड़ने के लिए चाहते हो जाएगा!

Answer 3

आधार आर ग्राफिक्स का उपयोग कर एक संस्करण है। चीजों को पाने के लिए आप शायद इसके साथ थोड़ा और खेल सकते हैं, लेकिन यह मूल रूप से आप क्या कर रहे हैं।

plot.new() 
par(mfcol=c(1,2)) 
plot(1:5,ann=FALSE,bty="n",type="l",ylim=c(0,25)) 
grid(ny=NA) 
par(mar=c(5.1, 0, 4.1, 2.1)) 
plot(c(10,20,30,40,50),c(8,5,15,20,20),yaxt="n",ann=FALSE,bty="n",type="l",ylim=c(0,25)) 
grid(ny=NA) 
par(new=TRUE) 
par(mfcol=c(1,1)) 
par(bty="l") 
par(mar=c(5.1, 4.1, 4.1, 2.1)) 
plot(NA,ylim=c(0,25),type="n",xaxt="n",yaxt="n",ann=FALSE) 
box() 
grid(nx=NA,ny=NULL) 

संपादित उसे थोड़ा snazzed