Dibuje un polígono entre puntos específicos en la programación R – función de polígono()

polygon()La función en R Language se usa para trazar un polígono entre puntos específicos en un gráfico existente.

Sintaxis: polígono (x_coordinates, y_coordinates)

Parámetros:
x_coordinates, y_coordinates: coordenadas x, y del gráfico para dibujar el polígono

Devuelve: un polígono en una parcela dada

Ejemplo 1: dibujar un polígono cuadrado en un gráfico R

# R program to draw a polygon
  
# Draw an empty plot
plot(2, 2, col = "white", xlab = "X", ylab = "Y")  
  
# Draw a polygon
polygon(x = c(2.7, 2.3, 2.2, 2.8),  # X-Coordinates of polygon 
        y = c(2.6, 2.8, 2.4, 2),    # Y-Coordinates of polygon
        col = "darkgreen") 

Producción:

Ejemplo 2: Bordes de color de polígono

# R program to draw a polygon
  
# Draw empty plot
plot(2, 2, col = "white", xlab = "X", ylab = "Y") 
  
# Draw a polygon
polygon(x = c(2.7, 2.3, 2.2, 2.8),  # X-Coordinates of polygon
        y = c(2.6, 2.8, 2.4, 2),    # Y-Coordinates of polygon
        col = "darkgreen",          # Color of polygon
        border = "red",             # Color of polygon border
        lwd = 8)                    # Thickness of border

Producción:

Aquí, border especifica el color del borde y lwd especifica el grosor del borde.

Ejemplo 3: Dibujar polígono de frecuencia

# R program to draw a polygon
  
# X values for frequency polygon
x1 <- 1:10                          
  
# Y values for frequency polygon
y1 <- c(2, 4, 7, 4, 5, 8, 6, 6, 1, 2)  
  
# Plot frequency polygon
plot(x1, y1,                                       
     type = "l",     # Set line type to line
     lwd = 4)         # Thickness of line
       
# X-Y-Coordinates of polygon
polygon(c(1, x1, 10), c(0, y1, 0),          
        col = "darkgreen")   # Color of polygon
  
# Add squares to frequency polygon
points(x1, y1,                          
       cex = 1,    # Size of squares                             
       pch = 12)  
       segments(x1, 0, x1, y1)  

Producción:

Ejemplo 4: Dibujar polígono debajo de la densidad

# R program to draw a polygon
  
# Set seed for reproducibility
set.seed(15000)      
  
# Sample size
N <- 1000             
  
# Draw random poisson distribution
x1 <- rpois(N, 2)                           
plot(density(x1),    # Draw density plot
     main = "",      # No main title
     xlab = "x1")    # Set name of x-axis to x2
       
# X-Coordinates of polygon
polygon(c(min(density(x1)$x), density(x1)$x),           
        c(0, density(x1)$y),     # Y-Coordinates of polygon
        col = "darkgreen")       # Color of polygon

Producción:

Aquí, el ejemplo anterior se usa para hacer que la densidad de probabilidad funcione.

Publicación traducida automáticamente

Artículo escrito por kaurbal1698 y traducido por Barcelona Geeks. The original can be accessed here. Licence: CCBY-SA

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *