r - 如何使X轴上的字体大小变量变小

Question

我有这段代码可以创建条形图，但是我想将x轴上的名称更改为物种名称，并且我想使字体更小以便可以全部使用。我尝试使用cex功能有各种组合，但没有用。我会很感激这个建议吗？

    count <-     
    matrix(c(16,102,11,106,15,95,26,87,18,99,21,103,12,110,30,103,10,107,20,87,13,110,17,93),     nrow = 2)  


    barplot(count, beside=T, legend =T, ylim=c(0,130),
    col=c("darkolivegreen3", "firebrick1"), 
    ylab="Frequency (no. of moths)", las = 3, 
    names = c("tiger\nCo", "tiger\nCr" , "eyes\nCo", "eyes\nCr", "mottled\nCo","mottled\nCr",  "pepperL\nCo","pepperL\nCr", "pepperD\nCo","pepperD\nCr", "convol\nCo", "convol\nCr"))        


    legend(6,130, legend=(c("survived","predated")), pch=c(15,22), cex=0.8,    col=c("darkolivegreen3","firebrick1"))

Answer 1

好吧，根据?barplot页面，有一个cex.names参数：

barplot(count, beside=T, legend =T, ylim=c(0,130),
    col=c("darkolivegreen3", "firebrick1"), 
    ylab="Frequency (no. of moths)", las = 3, 
    cex.names=0.8,
    names.arg = c("tiger\nCo", "tiger\nCr" , "eyes\nCo", "eyes\nCr", 
                   "mottled\nCo","mottled\nCr",  "pepperL\nCo", 
                   "pepperL\nCr", "pepperD\nCo","pepperD\nCr", 
                    "convol\nCo", "convol\nCr"))        
    legend(6,130, legend=(c("survived","predated")), pch=c(15,22),    
                          col=c("darkolivegreen3","firebrick1"))

我承认找到正确的cex。*参数有时很困难，有时需要单独调用axis，但是在这里看来微不足道。