Stratigrafik çizimlerdeki x ekseni sınırlarını değiştirin (örn. Çok panelli plotlar)

Question

Stratigrafik bir grafikte her bir panel için x ekseni sınırlarını manuel olarak nasıl ayarlayabilirim?

library(analogue) 
data(V12.122) 
Depths <- as.numeric(rownames(V12.122)) 

(plt <- Stratiplot(Depths ~ O.univ + G.ruber + G.tenel + G.pacR, 
        data = V12.122, type = c("h","l","g","smooth"))) 

nasıl örneğin C (0.3, 0.9) ve G.pacR için G.ruber arasında xlim değiştirebilir:

Örneğin, burada Stratiplotanalogue geliyor c (0, 0.75)?

library(rioja) 
library(vegan) ## decorana 
data(RLGH) 
# remove less abundant taxa 
mx <- apply(RLGH$spec, 2, max) 
spec <- RLGH$spec[, mx > 3] 
depth <- RLGH$depths$Depth 
#basic stratigraphic plot 
strat.plot(spec, y.rev=TRUE) 

Nasıl, örneğin, c TA004A ait xlim değiştirebilir (0, 20):

Veya, başka bir olasılık, burada rioja den strat.plot mı?

Sanırım temeldeki kafes/temel çizim kodunu ele almak için bir şey sağlamaya ihtiyacım var, ancak bununla nasıl başlayacağımı bilmiyorum.

Answer 1

Bu arsa nesnenin sınırlarını değiştirip

verir

# your data 
library(analogue) 
data(V12.122) 
Depths <- as.numeric(rownames(V12.122)) 

(plt <- Stratiplot(Depths ~ O.univ + G.ruber + G.tenel + G.pacR, 
        data = V12.122, type = c("h","l","g","smooth"))) 

# manually change the limits of second panel 
# this auto updates ticks and labels 
plt$x.limits[[2]] <- c(0.25,0.95) ; 

# resize the panels 
latticeExtra::resizePanels(plt, w=c(5,5,5,5)) 

Ancak bu değil panelleri yeniden boyutlandırmak için kafes Ekstra paketi kullanarak hızlı kısım cevaptır