Схема оформления вопроса

Чтобы изменить ширину линии только в легенде, вы должны использовать функцию guides(), а затем для colour= используйте guide_legend() с override.aes= и установите size=.

ggplot(iris,aes(Petal.Width,Petal.Length,color=Species))+geom_line()+theme_bw()+
       guides(colour = guide_legend(override.aes = list(size=3)))

[/g0]

Чтобы получить точки в легенде и строках в сюжете, обходным путем было бы добавить geom_point(size=0), чтобы убедиться, что точки невидимы, а затем в guides() установите linetype=0, чтобы удалить строки и size=3, чтобы получить большие точки.

ggplot(iris,aes(Petal.Width,Petal.Length,color=Species))+geom_line()+theme_bw()+
       geom_point(size=0)+
       guides(colour = guide_legend(override.aes = list(size=3,linetype=0)))

[/g1]