2017-05-19 35 views
-1

我最近对全球教育进行研究,下面的图表是我研究的重要情节。如何调整以下ggplot2图形?

motivation-performance of education

ggplot(sam_data,aes(JOY,PV)) + 
    geom_line(aes(colour = Individualism))+ 
    facet_grid(occupation~as.factor(Gender)) + 
    theme(legend.key.height = unit(2.0,"cm"),legend.text = element_text(size = 5,face = "plain")) + 
    scale_color_continuous("Individualism",labels=sam_data$country,breaks =sam_data$Individualism)+ 
    geom_smooth() 

而问题是很明显的:

1)不同国家的相关线时被分割成性别和职业的所有组合成一个线,而不是不同的线路。

2)这个传说是一团糟,因为我想让它清楚地表明与他们的个人主义水平相对应的国家。但是,我试图调整图例的许多参数,并没有太多的工作。

3)另外,我不知道如何删除breaks参数产生的白色间隙。任何想法都会很棒!

+1

请提供可重现的示例数据集。 – www

+0

我真的很抱歉@ ycw,因为论文还没有发表,数据不能按照我老板的要求分享,我知道你很难提供帮助,所以任何想法或提示都会有帮助。谢谢你的理解。 – exteralvictor

+1

您的数据的一小部分将有所帮助。有时候,人们甚至会创建一些伪造的数据作为示例来代表数据的特征和性质。无需感到抱歉。我只是想增加获得有用反馈的机会。 – www

回答

1

我已经通过调整ggplot函数中的aes参数解决了第二个问题。我的新代码如下

ggplot(sam_data,aes(JOYSCIE,PV1SCIE,group = CNTRYID)) + 
geom_point(aes(color = Individualism.comp4))+ 
facet_grid(recode.OCOD3~as.factor(Gender0women1men)) + 
theme(legend.key.height = unit(3.0,"cm"),legend.text = element_text(size = 5,face = "plain")) + 
scale_color_gradientn("Individualism",labels=sam_data$CNTRYID,breaks =sam_data$Individualism.comp4,colors = rainbow(4))+ 
scale_x_continuous(limits = c(-2,2))