小编Nat*_*ari的帖子

在这个条形图中,图例阻挡了它的一部分.如何减小图例的大小？

My code:

`work.gender.marriage.table = table(work$marriage,work$gender)`

`barplot(work.gender.marriage.table,main = "Gender & Marriage",
beside = TRUE,
legend = rownames(work.gender.marriage.table))`

我的数据:

`structure(list(marriage = structure(c(1L, 2L, 3L, 4L, 1L, 2L, 3L, 4L),    class = "factor", .Label = c("D", "M", "NM", "W")), gender = structure(c(2L, 2L, 2L, 2L, 1L, 1L, 1L, 1L), .Label = c("F", "M"), class = "factor"), val = c(12L, 61L, 78L, 56L, 71L, 33L, 86L, 93L)), .Names = c("marriage", "gender", "val"), row.names = c(NA, -8L), class = "data.frame")`

这是使用代码后的图像:

 barplot(work.gender.marriage.table,main = "Gender …