Réduire la taille de la zone de légende dans le barplot

Je ne peux pas réduire la taille de la légende dans cette parcelle. Quelqu'un pourrait-il m'aider? Je veux qu'il apparaisse haut, mais avec pas plus de 20% de la hauteur de la zone de traçage

a <- c(3, 2, 2, 2, 1, 2 )
barplot(a, beside = T,
col = 1:6, space = c(0, 2))
legend("topright", legend = c("a", "b", "c", "d", "e", "f"), fill = 1:6, ncol = 2)

source d'informationauteur Sergio.pv | 2014-06-23