Отметки оси для лесного участка в R

У меня есть участок, сделанный с помощью foresplot в пакете rmeta. Обратите внимание, что горизонтальная ось не имеет засечек. Как я мог добавить их, скажем, с интервалом 0.5?

Вот сюжет: plot

И код:

Forest1 <- read.table(file="Forest_1.txt", sep="\t", head=TRUE, row.names=1)

tabletext<-rbind(c("A","3.77"),
             c("B","1.33"),
             c("C","1.32"),
     c("D","1.12"),
     c("E","1.58"),
     c("F","0.9"))
m <-Forest1$OR
l <-Forest1$lower
u <-Forest1$upper

#overview datafile:
cbind(tabletext, m,l,u)
                          m      l        u       
[1,] "A"         "3.77" "3.77" "0.6144" "6.9256"
[2,] "B"         "1.33" "1.33" "0.644"  "2.016" 
[3,] "C"         "1.32" "1.32" "0.6536" "1.9864"
[4,] "D"         "1.12" "1.12" "0.4536" "1.7864"
[5,] "E"         "1.58" "1.58" "1.0116" "2.1484"
[6,] "F"         "0.9"  "0.9"  "0.7236" "1.0764"

forestplot(tabletext,m,l,u, zero=1, xticks=c(0.2,7),col=meta.colors(box="royalblue",line="darkblue", summary="royalblue"))

r range plot forestplot
person Lisann    schedule 18.12.2012    source источник
comment
Если вы имеете в виду числа под осью x, то в функции forestplot() вы можете попробовать заменить xticks=c(0.2,7) на xticks=c(0.2,seq(0.5,7,0.5))   -  person Didzis Elferts    schedule 18.12.2012
comment
Спасибо, Дидзис, у меня это работает! :)   -  person Lisann    schedule 19.12.2012
comment
@DidzisElferts: Это, вероятно, должно войти в поле для ответов ...   -  person Max Gordon    schedule 30.08.2015

Ответы (1)


arrow_upward
0
arrow_downward

Вы должны изменить свой вызов forestplot следующим образом:

forestplot(tabletext,m,l,u, zero=1, xticks=c(0.2,.7,1.2,1.7,2.2,2.7,3.2,3.7,4.2,4.7,5.2,5.7,6.2,6.7,7),col=meta.colors(box="royalblue",line="darkblue", summary="royalblue"))
person Corentin    schedule 07.10.2018