Как улучшить лесной участок (преобразовать тау-квадрат в символ и уменьшить поле между рядами)

Question

У меня небольшая проблема с моим кодом. Ниже я хочу достичь;

1. уменьшить поле между строками

2. для использования греческого символа для тау-квадрата

3. для уменьшения размера шрифта строк с информацией о неоднородности

Я провел метаанализ (байесовский) с использованием зазубрин, и хочу создать лесной участок с выходными данными от rjags. Я использую функцию forestplot, которая, кажется, обладает лучшими возможностями по сравнению с другими пакетами. Я попробовал блобограмму, но пакет был ограничен, я попробовал viz_forest, но не смог получить желаемых результатов. функция лесного графика, кажется, более гибкая для пользователей, чтобы определить входы по сравнению с другими. ниже мой пример кода

  library(forestplot)
  the data below
  data <- read.table(textConnection('mean lower upper 
  NA NA NA
  2.2   1.3 5.2 
  NA NA NA
  9.8 2.3 15.8 
  NA NA NA
  11.0 2.0 18.5  
  NA NA NA
  '), header=TRUE)



  m_text <- cbind(
  c("Country","Niger","Hetero: tau-squared= 40 95% Crl:37-58","London",
  "Hetero: tau-squared = 0.8 95% Crl:0.25-0.98","Total",
  "Hetero: tau-squared = 0.75 95% Crl:0.42-0.88"),
  c("Num.studies","130",NA,"120",NA,"150",NA),       
  c("sample_size","285879",NA,"932589",NA,"895427",NA),
  c("Atn[95%Crl]","2.2[1.3,5.2]",NA,"9.8[2.3,15.8]",NA,"11[2.0,18.5]",NA))


  forestplot(m_text, # input text datat
  txt_gp = fpTxtGp(label = list(gpar(fontfamily = "",cex=0.7), 
  gpar(fontfamily = "",cex=0.7,
  gpar(fontfamily="",cex=0.7))),
  ticks = gpar(fontfamily = "", cex=1),xlab  = gpar(fontfamily = 
  "HersheySerif", cex = 1)),graph.pos = 4,
  hrzl_lines=list("1" =gpar(lty=1,lwd=3), 
  "2" = gpar(lty=1), # add the line just below the first column
  "6" = gpar(lwd=1,lwd=3, columns=c(1:5), col = "#000044")), 
  data,fn.ci_norm=fpDrawDiamondCI,
  xlab = "AttendRate(Atn)",col=fpColors(box=c("royalblue","red","green")),
  clip=c(0,13),is.summary=c(TRUE,FALSE,FALSE,FALSE,FALSE,FALSE,FALSE),
  vertices = T, boxsize = 0.25)

Я хочу, чтобы строки "Гетеро ..." были немного ближе к родительской строке (то есть на несколько дюймов вверх), а также чтобы размер шрифта отличался от родительской строки.

Также я хочу использовать греческие символы вместо тау-квадрата. Было бы лучше иметь нормальный интервал между группами.

Заранее спасибо.