R Notebook

gráficos de dispersión con 3 variables del dataset IRIS usando R. Cada gráfico mostrará diferentes combinaciones de las variables del dataset:

Sepal.Length, Sepal.Width, Petal.Length, y Petal.Width.

Primero, asegúrate de tener el dataset IRIS cargado en R:

# Cargar el dataset IRIS
data(iris)
setwd("~/mod 3")

Gráfico 1: Sepal.Length vs Sepal.Width, coloreado por Species

# Gráfico 1
plot(iris$Sepal.Length, iris$Sepal.Width, col=iris$Species, 
     xlab="Sepal Length", ylab="Sepal Width", 
     main="Sepal Length vs Sepal Width")
legend("topright", legend=levels(iris$Species), col=1:3, pch=1)

Gráfico 2: Sepal.Length vs Petal.Length, coloreado por Species

# Gráfico 2
plot(iris$Sepal.Length, iris$Petal.Length, col=iris$Species, 
     xlab="Sepal Length", ylab="Petal Length", 
     main="Sepal Length vs Petal Length")
legend("topright", legend=levels(iris$Species), col=1:3, pch=1)

Gráfico 3: Sepal.Length vs Petal.Width, coloreado por Species

# Gráfico 3
plot(iris$Sepal.Length, iris$Petal.Width, col=iris$Species, 
     xlab="Sepal Length", ylab="Petal Width", 
     main="Sepal Length vs Petal Width")
legend("topright", legend=levels(iris$Species), col=1:3, pch=1)

Gráfico 4: Sepal.Width vs Petal.Length, coloreado por Species

# Gráfico 4
plot(iris$Sepal.Width, iris$Petal.Length, col=iris$Species, 
     xlab="Sepal Width", ylab="Petal Length", 
     main="Sepal Width vs Petal Length")
legend("topright", legend=levels(iris$Species), col=1:3, pch=1)

Gráfico 5: Sepal.Width vs Petal.Width, coloreado por Species

# Gráfico 5
plot(iris$Sepal.Width, iris$Petal.Width, col=iris$Species, 
     xlab="Sepal Width", ylab="Petal Width", 
     main="Sepal Width vs Petal Width")
legend("topright", legend=levels(iris$Species), col=1:3, pch=1)

Gráfico 6: Petal.Length vs Petal.Width, coloreado por Species

# Gráfico 6
plot(iris$Petal.Length, iris$Petal.Width, col=iris$Species, 
     xlab="Petal Length", ylab="Petal Width", 
     main="Petal Length vs Petal Width")
legend("topright", legend=levels(iris$Species), col=1:3, pch=1)

Gráfico 7: Sepal.Length vs Sepal.Width, tamaño de puntos por Petal.Length

# Gráfico 7
plot(iris$Sepal.Length, iris$Sepal.Width, col=iris$Species, 
     xlab="Sepal Length", ylab="Sepal Width", 
     main="Sepal Length vs Sepal Width (Size by Petal Length)",
     cex=iris$Petal.Length/mean(iris$Petal.Length))
legend("topright", legend=levels(iris$Species), col=1:3, pch=1)

Explicación

1. Gráficos 1-6: Cada gráfico muestra una combinación de dos variables del dataset IRIS, coloreadas por la especie de la flor (Setosa, Versicolor, Virginica). Esto permite visualizar cómo se distribuyen las diferentes especies en función de las variables seleccionadas.
2. Gráfico 7: Similar al Gráfico 1, pero con el tamaño de los puntos ajustado según la longitud del pétalo. Esto añade una tercera dimensión visual al gráfico, permitiendo observar cómo varía la longitud del pétalo junto con las otras dos variables.

Espero que estos gráficos te sean útiles. ¿Hay algo más en lo que pueda ayudarte?