2013-01-16 5 views
13

Mam kod ggplot i chciałem zmienić rozmiar etykiet na osi X i Y.Rozmiar etykiet dla osi X i osi y ggplot w R

kod:

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 

Innymi słowy „temperatura” i „Data i czas” i rozmiar czcionki powinny być zmieniane.

+2

Używasz funkcji 'theme' już, ale nie wydaje się, że czytać to dokumentacja. Proponuję teraz to zrobić. Podejrzewam, że okaże się to oświecające. – joran

Odpowiedz

32

Można zastosować różne opcje z 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

Można je również zastosować w pojedynczym wywołaniu 'theme()' w następujący sposób: 'theme (scale_shape_manual (values ​​= c (20,22)), geom_point (aes (kształt = wyniki), cex = 4, kolor = "blue3"), itp. ' – DirtStats

+0

Pojedyncze wywołanie' theme() 'w celu modyfikacji wszystkich elementów tekstowych na wykresie:' theme (text = element_text (size = 15)) '. –