Вы можете отрегулировать поля графика, используя par
(включая нижнее, левое, верхнее и правое поля соответственно).
Вы можете установить местоположение легенды, указав x
и значение y
в вашей функции legend
.
Вот результат с примерами данных:
# Make example slices and labels
slices <- c(5, 15, 8, 12, 10, 15, 30, 5)
slices_labels <- 1:8
# Adjust margins
par(mar=c(2,0,2,2))
# Draw pie chart
pie(slices, labels = slices_labels, cex = .6, main="Participant Household Job Holders", radius = 1,
col = c("skyblue3","lightcyan1"))
# Add legend specifying x and y
legend(x = 1.2, y = .3, c("1: mother", "2: father", "3: sister", "4: brother",
"5: aunt", "6: uncle", "7: other female relative",
"8: other male relative"), cex = 0.8)