आर

2013-01-16 6 views
13

में एक्स-अक्ष और वाई-अक्ष जीजीप्लॉट के लिए लेबल का आकार मेरे पास एक ggplot कोड है और मैं एक्स-अक्ष और वाई-अक्ष के लिए लेबल का आकार बदलना चाहता था।आर

कोड:

df.m <- melt(df, names(df)[2:3], names(df)[1]) 
df.m$Results <- factor(df.m$Results) 
df.m$HMn25_30.h <- strptime(as.character(df.m$HMn25_30.h), format = "%Y-%m-%d %H:%M:%S") 
p <- ggplot(df.m, aes(x = HMn25_30.h, y = value, group = variable, color = variable)) 
p <- p + scale_shape_manual(values=c(20,22)) 
p <- p + geom_point(aes(shape = Results), cex=4, color= "blue3") 
p <- p + geom_line(size=.8) 
p <- p + theme(axis.text.x = element_text(angle = 90, hjust = 1, size=13,color="darkred")) 
p <- p + scale_color_manual(values=c("Red")) 
p <- p + ylim(-1,8) 
p <- p + xlab('Date and Time') 
p <- p + ylab('Temperature') 
p <- p + ggtitle("Temporal Outliers of Node 25 ") + theme(plot.title = element_text(lineheight=3, face="bold", color="black", size=29)) 
p 

दूसरे शब्दों "तापमान" और "दिनांक और समय" फ़ॉन्ट और आकार में बदला जाना चाहिए।

+2

आप समारोह 'का उपयोग कर रहे theme' पहले से ही है, लेकिन आप यह प्रलेखन है पढ़ा है नहीं है। मेरा सुझाव है कि अब आप ऐसा करते हैं। मुझे संदेह है कि आप इसे प्रबुद्ध पाएंगे। – joran

उत्तर

32

आप theme के विभिन्न विकल्पों आवेदन कर सकते हैं:

p <- ggplot(df.m, aes(x = HMn25_30.h, y = value, group = variable, color = variable)) 
    p <- p + scale_shape_manual(values=c(20,22)) 
    p <- p + geom_point(aes(shape = Results), cex=4, color= "blue3") 
    p <- p + geom_line(size=.8) 
    p <- p + theme(axis.text.x = element_text(angle = 90, hjust = 1, size=13,color="darkred")) 
    p <- p + scale_color_manual(values=c("Red")) 
    p <- p + ylim(-1,8) 
    p <- p + theme_bw() 
    p <- p + xlab('Date and Time') 
    p <- p + ylab('Temprature') 
    p <- p + ggtitle("Temporal Outliers of Node 25 ") + theme(plot.title = element_text(lineheight=3, face="bold", color="black", size=29)) 
    p <- p + labs(x = "Date-Time ", y = "Temprature ") 
    p <- p + theme(axis.title.y = element_text(size = rel(1.8), angle = 90)) 
    p <- p + theme(axis.title.x = element_text(size = rel(1.8), angle = 00)) 
    p 
+0

इन्हें इस तरह के एक 'थीम()' कॉल में भी लागू किया जा सकता है: 'थीम (scale_shape_manual (मान = सी (20,22)), geom_point (एईएस (आकार = परिणाम), cex = 4, रंग = "blue3"), आदि ' – DirtStats

+0

साजिश में सभी पाठ तत्वों को संशोधित करने के लिए एक एकल विषय() 'कॉल:' थीम (text = element_text (आकार = 15)) '। –