Visualisasi Data

  1. Histrogram Harga Berlian

ggplot(diamonds, aes(x = price)) +
  geom_histogram(binwidth = 500,  fill = "skyblue", color = "steelblue") +
  labs(
    title = "Histogram Harga Berlian",
    x = "Harga (USD)",
    y = "Frekuensi"
  ) +
  theme_minimal()

interpretasi : Histogram menunjukkan bahwa sebagian besar berlian berada pada rentang harga rendah hingga menengah. Terdapat puncak frekuensi pada harga-harga yang tidak terlalu tinggi. Hal ini menunjukkan bahwa berlian dengan harga sangat tinggi relatif sedikit.

  1. Density Plot dengan Highlight

ggplot(diamonds, aes(x = price)) +
  geom_density(
    fill = "skyblue", 
    color = "steelblue", 
    alpha = 0.8,
    linewidth = 0.2
  ) +
  labs(
    title = "Density Plot Harga Berlian",
    x = "Harga (USD)",
    y = "Kepadatan"
  )+
  theme_minimal()

interpretasi: Grafik density memperjelas pola distribusi harga. Kurva menunjukkan puncak kepadatan pada harga rendah hingga menengah, kemudian menurun secara perlahan ke arah harga tinggi. Bentuk kurva yang tidak simetris memperkuat bahwa distribusi harga tidak normal dan cenderung memiliki ekor panjang di sisi kanan.

  1. Boxplot Price

ggplot(diamonds, aes(y = price)) +
  geom_boxplot(fill = "skyblue") +
  labs(
    title = "Boxplot Harga Berlian",
    y = "Harga (USD)"
  ) +
  theme_minimal()

interpretasi:Boxplot menunjukkan bahwa median harga berada di bagian bawah rentang keseluruhan data. Terlihat banyak titik outlier di bagian atas, yang menandakan adanya berlian dengan harga sangat tinggi.Hal ini mengindikasikan bahwa variasi harga cukup besar dan terdapat ketimpangan distribusi harga di pasar berlian.