我正在尝试将一些图表相互匹配。有些是在 Sigmaplot 中制作的，我无权访问数据。所以这意味着我的新图表必须看起来尽可能相似，我正在使用它ggplot来实现这一点。我添加了 100 万个小细节，使它们更相似，但我仍然无法理解其中一个细节。
线端应该是四舍五入的，我已经通过lineend = "round"在geom_line(). 然而，图例中的线端仍然有一个对接端。我是一个坚持一致性的人，每一个细节都是如此，这意味着我真的不能接受......
这是一个例子。
var1 <- seq(1,100,10)
var2 <- c(1:10)
trt <- c("t1", "t1", "t1", "t1", "t1", "t2", "t2", "t2", "t2", "t2")
my.df <- data.frame(var1, var2, trt)
ggplot(data = my.df, aes(x = var1, y = var2, col = trt))+
geom_line(size = 3, lineend = "round")
我有一张图表，显示了随着时间的推移植物的生长。随着时间的推移，我会使用成长度的天数（基本上是时间和温度的综合度量）。现在，我想在顶部添加第二个x轴，以显示“真实”时间，即从实验开始几周，以便观众可以更清楚地了解何时发生了什么。由于度数天数的性质，它们无法以任何数学方式转换为数周。因此，我将不得不单独添加信息，例如1周是500 gdd，2周是800 gdd，3周是1400 gdd。此信息绝不会与图形本身的内容相对应。
这是我的简单代码，用于度数天数不断增长的图形。
my.df<-data.frame(ccc=seq(0,15,1),gdd=seq(0,1500,100))
ggplot(data=my.df, aes(x=gdd, y=ccc))+
geom_line()
现在，我需要做的是在顶部的轴刻度线分别为500、800和1400 gdd，分别是1、2和3，以及轴标签为“ weeks”。有办法吗？到目前为止，我唯一的想法是将其添加到photoshop中，但是多数民众赞成在作弊:)