2014-12-05 27 views

回答

1

您几乎可以通过添加theme()选项来完成ggplot的任何操作。 (至少,你怎么会微调的东西反正。)

?likert

library("likert") 
data(pisaitems) 
items29 <- pisaitems[,substr(names(pisaitems), 1,5) == 'ST25Q'] 
names(items29) <- c("Magazines", "Comic books", "Fiction", 
        "Non-fiction books", "Newspapers") 
l29 <- likert(items29) 
summary(l29) 

p1 <- plot(l29) # assign the plot to an object 

# modify some stuff 
p1 + theme(text = element_text(size = rel(6), colour = "red"), 
      axis.text.y = element_text(colour = "blue", 
             family = "Courier")) 

一般使用示例数据,你可以看看返回一个主题调用,例如theme_bw()看到所有可以用这种方式修改的东西。任何在plot.likert代码中设置的东西(例如y轴文本颜色)都需要被明确修改,它不会从更一般的text继承。如果它主要是你正在修改的文本,?element_text可能会有所帮助。

另请注意,如果您正在使用RStudio设置,则字体系列可能不会更改绘图窗口中的绘图,但如果将绘图导出为PDF,则它将起作用。 (至少对我来说,在Windows上)

如果你想改变作为图的一部分的文本(由geom_text设置),你可能需要真正的破解这个函数。它是all on github,所以只需制作你自己的包装分支。

+0

太快了,谢谢。我正处于工作的最后期限,所以不要太长时间才能弄清楚所有这些工作如何。如何将插值颜色从neutral.color.ramp更改为单独设置所有5种颜色。任何想法如何工作?再次感谢 – user3055869 2014-12-05 01:40:43

+0

Nvm,想通了。 + scale_fill_manual(values = c(“blue”,“blue”,“blue”,“blue”,“blue”)) – user3055869 2014-12-05 02:28:54

相关问题