更改图例标题和类别中的文本R ggplot2

Question

我是R的新手，我正在尝试制作一个条形图，我需要更改图例中的文字。我读到我可以改变列名，但是我需要使用西班牙语术语，因此对于变量名这样的单词并不是一个好主意。知道如何更改图例中的文字？提前谢谢！

PD。我知道我的代码可能不是最佳的，但这是我的第一次尝试

#libs
library(xlsx)
library(ggplot2)
library(reshape2)

#Import data
reporte<-read.xlsx("PATH",1)

#Change column names
colnames(reporte)<-c("mes","auto","manual","especial","prom")

#Data format for graph
reportem<-melt(reporte[,c("mes","auto","manual","especial")],id.vars=1)

#Fix month order
reportem$mes<-factor(reportem$mes,levels = reportem$mes[order(reportem$variable)])

#Grouped bar chart
g1<-ggplot(data=na.omit(reportem), aes(fill=variable,x=mes, y=value)) + geom_bar(stat="identity",position="dodge") + scale_fill_brewer(palette = "Blues",direction=-1) 
+theme(panel.background=element_rect(fill = "white",colour = "grey"),panel.grid.major=element_blank(),panel.grid.minor=element_blank())

#Add trend line
g2<-g1+geom_line(data=na.omit(reporte),aes(x=mes,y=prom,group=1),colour="red",inherit.aes = FALSE)

#Trend values
g3<-g2+geom_text(data=na.omit(reporte),aes(x=mes,y=prom,group=1,label=prom,vjust=-1),inherit.aes = FALSE)

#Changing title and axis lables
g4<-g3+labs(x="Mes",y="Porcentaje") + ggtitle("Evolución PackInfo")