Minha pergunta é uma extensão deessa questão. Observe que estou usando a versão 2.3.0, disponível emgithub, ainda não no CRAN.

library(ggplot2)

df <- data.frame("Categories" = rep(c("A", "B", "C"), 3),  
                 "values" = c(rep(0.39, 3), rep(0.37, 3), rep(0.24, 3)),
                 "X" = 1:9)

ggplot(df, aes(x = X, y = values, colour = Categories)) +
  geom_line() +
  theme(
        legend.position = "top",
        legend.spacing.x = unit(2, unit = "cm"),
        legend.title = element_blank()
        ) 

O código acima cria esse gráfico.

Gostaria de mover os rótulos das legendas (A, B, C) para mais perto de seus ícones correspondentes, conforme mostrado pelas setas vermelhas abaixo, o que criaria mais espaço em branco entre as categorias de legenda. Como eu faria isso?