ggplot2 black and white theme

library(ggplot2)

# Create example data
set.seed(42)
data <- data.frame(
  x = rnorm(100),
  y = rnorm(100)
)

# Create a plot using ggplot with black and white theme
ggplot(data, aes(x = x, y = y)) +
  geom_point(color = "black") +
  theme_bw()