Program 9

USN:

1NT24IS227

RPubs Link:

https://rpubs.com/Stephen__/1416497

Objective

Create multiple histograms using ggplot2::facet_wrap() to visualize how a variable (e.g., Sepal.Length) is distributed across different groups (e.g., Species) in a built-in R dataset.

---

# Load the ggplot2 package
library(ggplot2)

---

Step 1: Load and Explore the Dataset

# Load the iris dataset
data(iris)

# View the first few rows of the dataset
head(iris)

  Sepal.Length Sepal.Width Petal.Length Petal.Width Species
1          5.1         3.5          1.4         0.2  setosa
2          4.9         3.0          1.4         0.2  setosa
3          4.7         3.2          1.3         0.2  setosa
4          4.6         3.1          1.5         0.2  setosa
5          5.0         3.6          1.4         0.2  setosa
6          5.4         3.9          1.7         0.4  setosa

---

Step 2: Create Grouped Histograms Using facet_wrap

# Create histograms using facet_wrap for grouped data
p <- ggplot(iris, aes(x = Sepal.Length)) 
p

p <- p +
  geom_histogram(binwidth = 0.3, fill = "skyblue", color ="black") 
p

p <- p +
  facet_wrap(~ Species) 
p

p <- p +
  labs(title = "Distribution of Sepal Length by Species",
       x = "Sepal Length (cm)",
       y = "Frequency")
p

p <- p  +
  theme_minimal()
p