Zmniejsz rozmiar obszaru legendy na wykresie siatki

Question

Nie mogę zmniejszyć rozmiaru legendy na tym wykresie. Czy ktoś może mi pomóc? Chcę go do stawienia topright, ale nie więcej niż 20% wysokości działki

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) 

Answer 1

Parametr cex zrobi to za Ciebie.

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, 
     cex = 0.75)