आर में ggplot2 में टाइल्स पर लेबल कैसे रखें?

Question

कार्य geom_tile और scale_fill_gradient अच्छी गर्मी का उत्पादन करते हैं। ggplot2 टाइल्स में लेबल कैसे जोड़ें, ताकि प्रत्येक टाइल पर इसके संबंधित मूल्य का मुद्रित हो?

पीएस: ऐसे कई पैकेज हैं जो सफलता की भारी डिग्री के साथ हीटमैप करते हैं (उदाहरण के लिए, एक सर्वेक्षण यहां है: drawing heatmap with dendrogram along with sample labels)। लेकिन यदि संभव हो तो मुझे ggplot2 समाधान में रूचि है।

एक छोटा सा कोड उदाहरण (लेबल के बिना):

library(Hmisc) 
library(ggplot2) 
df <- data.frame(row=sample(c("A", "B"), 10, replace=T), 
       col=sample(c("x", "y"), 10, replace=T), 
       val=rnorm(10)) 
sdf <- summaryBy(val~row+col, data=df, FUN=mean) 
ggplot(sdf, aes(x=row, y=col)) + 
    geom_tile(aes(fill = val.mean), colour = "white") + 
    scale_fill_gradient(low = "white", high = "yellow") 

Answer 1

बस:

+geom_text(aes(label=val.mean))