Colorbar da custom colorRampPalette

Eu defini uma colorRampPalette:

my.colors = colorRampPalette(c("light green", "yellow", "orange", "red"))

Como plotar um item de "legenda" da barra de cores para ele, de preferência usando apenas os pacotes base? Estou atrás de um retângulo preenchido com esse gradiente de core

O que eu realmente busco é uma maneira de produzir o mesmo tipo de legenda (barra de cores) plotada com uma varredura "raster":

require(raster)
plot(raster("myfile.tif"), legend=T)

Preciso colocar isso em cima de outro lot

questionAnswers(8)

yourAnswerToTheQuestion