RStudio ggplot heatmap format

Question

i have the a problem to format a heatmap. My code is:

p <- ggplot(Daten,aes(y=Week,x=Day,fill=de_work))+geom_tile(color="white")
p <- p + coor