library(ggplot2)

d <- read.csv("~/Downloads/cosine.csv", header = TRUE)
d$iter <- factor(d$iter, levels = c("base", "es", "de", "fr", "it", "pt", "en"))

ggplot(data=d, aes(x=d$iter, y=d$score, group=d$algo, colour=d$algo)) +
  geom_line(size=0.8, aes(color=d$algo)) +
  geom_point(size=0.8, color="black") +
  theme_classic() +
  theme(legend.position="right") +
  #scale_linetype_manual(values=c("dashed", "solid", "dotdash", "solid","solid"), name = "") +
  scale_color_manual(values=c("red4", "royalblue2", "springgreen4")) +
  labs(x = "Iteration step",
       y = "Average Cosine Similarity",
       color = "Algorithm") +
  theme(plot.title = element_text(hjust = 0.5))