Etichette di testo con contorno in R

Question

Mi chiedo se sia possibile disegnare il testo con una struttura in R, in modo che il testo sia leggibile indipendentemente dallo sfondo (come il testo sui meme). Il seguente (ovviamente) non riesce:

# prepare a colorful background 
randcolors <- sprintf("#%02X%02X%02X99", sample(1:255, 1000, replace=T), sample(1:255, 1000,replace=T), sample(1:255, 1000, replace=T)) 
plot(NULL, xlim=c(0,1), ylim=c(0,1), xaxt="n", bty="n", yaxt="n") 
points(runif(1000, 0, 1), runif(1000, 0, 1), cex=runif(1000, 0.5, 5), col= randcolors, pch= 19) 
text(0.5, 0.5, "test text", cex= 5) 
text(0.5, 0.5, "test text", cex= 4.5, col="white") 

Il risultato non è spettacolare:

Chiaramente, posso creare prima uno sfondo bianco o semi-trasparente, ma vorrei davvero preferirei di gran lunga avere dei bei contorni

Answer 1

Prova shadowtext dal pacchetto TeachingDemos:

shadowtext(0.5, 0.5, "test text", cex= 4.5, col="white" , r=0.3)