Comment limiter la gamme de l'échelle de couleurs viridis ?

Question

Je dispose de deux ensembles de données, que je souhaite présenter à l'aide d'une carte thermique avec l'échelle de couleurs viridis. Pour le premier ensemble de données, mes valeurs vont de 0 à 1,2 et je peux facilement voir les différences que je veux voir. Cependant, mon deuxième ensemble de données comporte quelques valeurs aberrantes, ce qui donne une plage de 0 à 2. Il est maintenant plus difficile de voir les différences dans la plage intéressante entre 0 et 1 et il est plus difficile de comparer directement les deux images. Existe-t-il une possibilité de montrer les données de 0 à 1,2 en utilisant l'échelle de couleur viridis tout en montrant les valeurs les plus élevées en jaune (couleur "la plus élevée" de l'échelle viridis) ? Voici un exemple :

library(viridis)

#Create Data
DataSet1 <- expand.grid(x = 0:5, y = 0:5)
DataSet1$z <- runif(36, 0, 1.2)

DataSet2 <- expand.grid(x = 0:5, y = 0:5)
DataSet2$z <- runif(36, 0, 2)

#Plot Data
ggplot(DataSet1, aes(x, y, fill = z)) + 
  geom_tile() +
  scale_fill_viridis() +
  geom_text(aes(label = round(z, 2)), size = 2)

DataSet1 : Les différences entre 0,5 et 0,7 sont faciles à voir.

ggplot(DataSet2, aes(x, y, fill = z)) + 
  geom_tile() +
  scale_fill_viridis() +
  geom_text(aes(label = round(z, 2)), size = 2)

DataSet2 : Les différences entre 0,5 et 0,7 sont difficilement perceptibles.