小编LvG*_*LvG的帖子

我一直在使用atop和expression在R中为一些数字创建轴标签,因为我需要用斜体字来表示,使用上标,我的标签需要超过两行.

这是我正在使用的一个例子:

plot(c(1:10),ylab="")
mtext(side=2,line=2,expression(atop('Mean height of ', italic(Dicksonia~antarctica)*  ' (m)')))

但是,两条线之间的空间对于我的数字来说太大了.我可以减少这个空间吗？

我正在尝试使用 ggarrange 创建一个绘图面板。我使用“标签”参数为每个图创建一个标题，但每个图的定位都不同，具体取决于标题的长度。似乎标题越长，标签打印得越靠右。

如何使所有标签左对齐？我尝试过使用hjustor label.x，但这并没有改变什么。

这是我的代码和情节：

ggarrange(plot1,plot2,plot3,
          common.legend=TRUE,
          labels = c("asdf", "asdfasdf", "asdfasdfasdfsadfasdf"),
          hjust=-0.8,
          ncol = 2, nrow = 2)

我有一个闪亮的应用程序，用户上传两个 csv 文件 - 一个参考数据集和一个测试数据集。数据集在服务器代码中的反应式表达式中进行操作，然后使用其输出来生成表格和图表。

如果没有上传参考数据集，我想使用默认参考数据集。如果没有上传数据，如何让反应式表达式返回默认数据？

我尝试在应用程序开头加载数据（将其称为“default.ref.data”，然后在服务器代码中使用以下内容：

ref.data=reactive({
   req(input$ref.upload)
   # read the data frame that has been uploaded
   df.ref1 <- read.csv(input$ref.upload$datapath) 

   #do some stuff

   return(df.ref1)
   if(is.null(input$files)) return(default.ref.data)
})

最后一行的目的是在没有上传输入文件的情况下返回我之前读入的默认文件。这是行不通的。我应该做什么？我应该从不同的角度来看待它吗？