Open In App
Related Articles

Add Color Between Two Points of Kernel Density Plot in R Programming – Using with() Function

Improve
Improve
Improve
Like Article
Like
Save Article
Save
Report issue
Report
plot() and with() functions are used to draw and add color between a particular area of two points of Kernel Density Plot in R Language.

Draw a Kernel Density plot

plot() function in R Language is used to draw a Kerner Density Plot
Syntax: plot(dens_x) Parameters: dens_x: Default plot of density. Returns: Kernel density plot
# Create example data
  
set.seed(72500)  
x <- rnorm(800)
dens_x <- density(x)
plot(dens_x)       

                    
Output:

Adding Color to Plot

with() function is used to add color between two points of the graph.
Syntax: with(dens_x, polygon(x = c(x), y = c(0, y[x_low:x_high], 0), col = ” “)) Parameters: dens_x: Default plot of density. x_low, x_high: lower limit and upper limit of colored area col: Name of color Returns: Color plot between to particular plots with specified color.
# color the plot
  
set.seed(72500)  
x <- rnorm(800)
dens_x <- density(x)
plot(dens_x)       
x_low <- min(which(dens_x$x >= - 0.5))   # Define lower limit of colored area
x_high <- max(which(dens_x$x < 1))       # Define upper limit of colored area
with(dens_x,                             # Add color between two limits
     polygon(x = c(x[c(x_low, x_low:x_high, x_high)]),
             y = c(0, y[x_low:x_high], 0),
             col = "darkgreen"))

                    
Output:

Last Updated : 19 Jun, 2020
Like Article
Save Article
Previous
Next
Share your thoughts in the comments
Similar Reads