This can be accomplished through the na.value argument in scale_color_gradientn.
library(ggplot2)
p2 <- ggplot(mtcars, aes(x=mpg, y=disp, color=hp)) +
geom_point() +
scale_color_gradientn(colours = rainbow(4),
limits=c(50, 100), na.value = "transparent") +
scale_x_continuous(limits=c(10,20),
breaks =seq(from=10,to=20,by=2))+
scale_y_continuous(limits=c(70,300),
breaks = seq(from = 70, to = 300, by = 20))
p2
#> Warning: Removed 25 rows containing missing values (geom_point).
If you are a beginner and want to know more about R then do check out the following R programming tutorial.