Лесозапись по оси x опускать этикетки, но нарисовать отметки

У меня есть участок, сделанный с forestplot в пакете rmeta. Обратите внимание, что горизонтальная ось не имеет меток и меток между 0,2 и 7. Как я могу добавить отметки без ярлыков на 1,2,3,4,5 и 6 без с маркировкой? Я просто хочу отметить отметки здесь. Вот график: enter image description here Лесозапись по оси x опускать этикетки, но нарисовать отметки

Как я могу установить отметки в 0,2,1,2,3,4,5,6 и 7, но я отмечен только при c (0,2,7)? Этот код:

library(rmeta) 
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=c(3.77,1.33,1.32,1.12,1.58,0.9) 
l=c(0.6144,0.644,0.6536,0.4536,1.0116,0.7236) 
u=c(6.9256,2.016,1.9864,1.7864,2.1484,1.0764) 
#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"))

Я мог бы расширить xticks = с (0.2,7) к xticks = C (0.2,1,2,3,4,5,6,7), но потом все метки на 2,3,4,5,6 также будет напечатано, чего я не хочу.

источник

2014-01-21 user3219379

Вместо 'Forest1 <- read.table (файл =" Forest_1.txt ", sep =" \ t ", head = TRUE, row.names = 1) ', который никому не помогает, вы должны дать результат 'dput (Forest1)', чтобы сделать ваш код воспроизводимым. – ziggystar

спасибо ziggystar, я скорректировал код, чтобы быть готовым к копированию и вставить в windows R. – user3219379

Спасибо за предложение. Rmeta не имеет такой вариант, но я добавил это к forestplot-пакет (в настоящее время в разработке отрасли 1.2.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=c(3.77,1.33,1.32,1.12,1.58,0.9) 
l=c(0.6144,0.644,0.6536,0.4536,1.0116,0.7236) 
u=c(6.9256,2.016,1.9864,1.7864,2.1484,1.0764) 

#overview datafile: 
xticks <- seq(from = 0.2, to = 7, by = .5) 
xlabels <- rep(TRUE, length.out = length(xticks)) 
xlabels[xticks > 2] <- FALSE 
xlabels[length(xlabels)] <- TRUE 
attr(xticks, "labels") <- xlabels 
forestplot(tabletext,new_page = TRUE, 
      m,l,u, 
      zero=1, 
      xticks=xticks, 
      col=fpColors(box="royalblue",line="darkblue", summary="royalblue"))

Скачать разработать версию с помощью DevTools:

devtools::install_github("gforge/forestplot", ref="develop")

источник

2015-08-30 18:45:12

Лесозапись по оси x опускать этикетки, но нарисовать отметки

ответ

Смежные вопросы