Question

我需要在R中设置netgaph的帮助。我想通过圆形可视化设置网络元分析中治疗标签的位置。

某些治疗标签标题之间的距离太近，我们无法阅读它们。

我不知道要使用R中对netgraph的帮助中值部分所述的xpos.labels和ypos.labels。

netgraph(net2, seq = net2$seq, labels=net2$trts,
         points=TRUE, 
         cex.points=t2$size_pt, col.points = "lightblue4", pch.points = 19,
         cex=0.5, 
         thickness="se.fixed", 
         scale=.85, offset = 0.025,
         number.of.studies=T, cex.number.of.studies=1, 
         col.number.of.studies = "White", 
         bg.number.of.studies = "Black",
         col.multiarm = "grey",
         col = "Black", plastic =F, ypos.labels=vec_y_modif)
Warning messages:
1: In plot.window(...) : "ypos.labels" is not a graphical parameter
2: In plot.xy(xy, type, ...) :
  "ypos.labels" is not a graphical parameter
3: In title(...) : "ypos.labels" is not a graphical parameter

请问您需要什么帮助吗？

Answer 1

据我从文档中可以看到，您应该使用ypos而不是ypos.labels

require(DBI)
require(dbplyr)

con <- dbConnect(RSQLite::SQLite(), dbname = ":memory:")
month_input <- SQL(!!translate_sql(month.abb))
# Or if you don't like lazy-eval NSE nonsense
month_input <- dbplyr:::escape(month.abb)
print(month_input)
# <SQL> ('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec')

query <- sqlInterpolate(con, "SELECT * FROM colours WHERE month IN ?months",
  months = month_input)
print(query)
# <SQL> SELECT * FROM colours WHERE month IN ('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec')

netgraph：设置标签的位置

1 个答案: