Modify range of color of raster image using a gradient in R

Question

For a rasterBrick, I would like to decrease the value of all pixels having a value higher than 0.5 for the layer 3 only. In the following example I divided by a coefficient 2 bu