虽然@Didzis拥有correct answer，但我将详细说明几点
美学可以在ggplot调用中设置或Map。

• aes（......）中定义的美学是从数据Map而来的，并创建了一个图例。
• 通过在aes（）外部定义美学，也可以将其设置为单个值。

据我所知，您需要的是将size set 为单个值，而不是在aes()调用中 *map
调用aes(size = 2)时，它会创建一个名为2的变量，并使用该变量创建大小，将其从一个常量值Map到aes调用中的值（因此它会出现在图例中）。
使用size = 1（不使用reg_labeller，reg_labeller可能在脚本中的某个位置定义）

Figure29 +
    geom_line(aes(group=factor(tradlib)),size=1) +
    facet_grid(regionsFull~., scales="free_y") +
    scale_colour_brewer(type = "div") +
    theme(axis.text.x = element_text(
          colour = 'black', angle = 90, size = 13,
          hjust = 0.5, vjust = 0.5),axis.title.x=element_blank()) +
    ylab("FSI (%Change)") +
    theme(axis.text.y = element_text(colour = 'black', size = 12), 
          axis.title.y = element_text(size = 12, 
          hjust = 0.5, vjust = 0.2)) + 
    theme(strip.text.y = element_text(size = 11, hjust = 0.5,
          vjust =    0.5, face = 'bold'))

并且大小= 2

Figure29 + 
     geom_line(aes(group=factor(tradlib)),size=2) +
     facet_grid(regionsFull~., scales="free_y") + 
     scale_colour_brewer(type = "div") +
     theme(axis.text.x = element_text(colour = 'black', angle = 90,
          size = 13, hjust = 0.5, vjust = 
          0.5),axis.title.x=element_blank()) + 
     ylab("FSI (%Change)") +
     theme(axis.text.y = element_text(colour = 'black', size = 12),
          axis.title.y = element_text(size = 12,
          hjust = 0.5, vjust = 0.2)) + 
      theme(strip.text.y = element_text(size = 11, hjust = 0.5,
          vjust = 0.5, face = 'bold'))

现在，您可以定义大小，以便与最终图像大小和设备类型配合使用。

ggplot2中的线宽可通过geom_line()中的参数size=进行更改。

#sample data
df<-data.frame(x=rnorm(100),y=rnorm(100))
ggplot(df,aes(x=x,y=y))+geom_line(size=2)

ggplot2中的线宽可通过geom_line()中的参数lwd=进行更改。

geom_line(aes(x=..., y=..., color=...), lwd=1.5)

看起来如果你只把size参数放在geom_line()部分，而没有aes()，它会适当地缩放，至少它在geom_density中是这样工作的，我也遇到了同样的问题。

如果您想灵活地修改线宽，您可以使用“scale_size_manual”，这与选择颜色、填充、alpha等的步骤相同。

library(ggplot2)
library(tidyr)

x = seq(0,10,0.05)

df <- data.frame(A = 2 * x + 10,
                 B = x**2 - x*6,
                 C = 30 - x**1.5,
                 X = x)

df = gather(df,A,B,C,key="Model",value="Y")

ggplot( df, aes (x=X, y=Y, size=Model, colour=Model ))+
  geom_line()+
  scale_size_manual( values = c(4,2,1) ) +
  scale_color_manual( values = c("orange","red","navy") )

只需在aes（）函数 * 外部 * 添加size命令，并添加所需的任何小数值，例如size = 1.5

geom_line(data,aes(x=x,y=y), size=1.5)