2017-08-21 2 views
1

Dans mon image je reçois un heatmap et je veux mettre des données spécifiques, ce qui serait les années: 2014,2015,2016, avec des couleurs différentes, puis je veux changer le nom de l'ylab comme je le fais, et enfin comment j'ajoute le titre. Merci d'avance.ggplot change heatmap pour xvalues ​​exactement

Le code j'était le suivant:

ggplot(TLM, aes (Month, Temp)) + geom_line(aes(group = Year, color = Year)) 

enter image description here

Ma base de données est distribuée ainsi:

enter image description here

+0

Quelle est votre question? Aussi, veuillez inclure un exemple reproductible. – Prradep

+0

Claudia - Avez-vous trouvé la réponse ci-dessous? – micstr

Répondre

0

Avec votre carte g <- ggplot(TLM, aes (Month, Temp)) + geom_line(aes(group = Year, color = Year))

Pour ajouter un titre:

g <- g + ggtitle("My heatmap title") 

vous pouvez également utiliser labs(title = "my title"). Ce link shows si vous avez besoin de faire des trucs comme \ n de séparer des titres longs sur deux lignes.

Notez que le new ggplot2 dispose de fonctionnalités pour ajouter des légendes, etc.

Changer mon ylabel

Utilisez ylab pour ce faire. Supposons que vous voulez dire la température (Celsius) non Temp

g <- g + ylab("Temperature (Celsius)") 

Modifier libellé sur le dessus de la légende

Disons que vous vouliez changer Ano en année pour une publication anglaise

g <- g + labs(color = "Year") 

CODE EXEMPLE EN PLEIN

donc, mettre tout cela ensemble sur un sous-ensemble de vos données, il ressemblerait à ceci:

example plot of temp

library(ggplot2) 
library(data.table) 

mydata <- data.table(Ano = c("2015", "2015", "2016", "2016"), 
        Mes = c("Enero", "Febrero", "Enero", "Febrero"), 
        Temp = c(18.17, 18.63, 20.66, 21.1)) 

#> mydata 
# Ano  Mes Temp 
#1: 2015 Enero 18.17 
#2: 2015 Febrero 18.63 
#3: 2016 Enero 20.66 
#4: 2016 Febrero 21.10 

#ggplot(TLM, aes (Month, Temp)) + geom_line(aes(group = Year, color = Year)) 
g <- ggplot(mydata, aes (Mes, Temp)) + geom_line(aes(group = Ano, color = Ano)) 

# splitting it for illustrative purposes 
# you can do this all in one step ggplot + ggtitle + ylab etc. 
# title 
g <- g + ggtitle("My heatmap title") 

# ylab 
g <- g + ylab("Temperature (Celsius)") 

# legend 
g <- g + labs(color = "Year") 

#Plot chart 
print(g)