Plot 3D adalah salah satu jenis plot yang paling populer dalam analisis data statistik. Plot 3D dapat digunakan untuk menganalisis hubungan antara tiga variabel yang terlibat dalam sebuah sistem. Dalam artikel ini, kita akan membahas cara membuat plot 3D dengan menggunakan library R rgl.

Menggunakan Warna

Plot 3D dapat dibuat dengan menggunakan warna untuk menunjukkan grup-data yang berbeda. Contohnya, kita dapat menggunakan fungsi scatter3d dari library rgl seperti berikut:

library(rgl)
scatter3d(x = sep.l, y = pet.l, z = sep.w, groups = iris$Species,
 surface=FALSE, grid = FALSE, ellipsoid = TRUE,
 surface.col = c("#999999", "#E69F00", "#56B4E9"))

Dalam contoh di atas, warna digunakan untuk menunjukkan grup-data yang berbeda. Kita juga dapat menggunakan warna palette dari library RColorBrewer seperti berikut:

library(RColorBrewer)
colors <- brewer.pal(n=3, name="Dark2")
scatter3d(x = sep.l, y = pet.l, z = sep.w, groups = iris$Species,
 surface=FALSE, grid = FALSE, ellipsoid = TRUE,
 surface.col = colors)

Mengubah Judul Aksis

Kita dapat mengubah judul aksis dengan menggunakan argument xlab, ylab, dan zlab seperti berikut:

scatter3d(x = sep.l, y = pet.l, z = sep.w,
 point.col = "blue", surface=FALSE,
 xlab = "Sepal Length (cm)", ylab = "Petal Length (cm)",
 zlab = "Sepal Width (cm)")

Menghapus Skala Aksis

Kita dapat menghapus skala aksis dengan menggunakan argument axis.scales seperti berikut:

axis.scales = FALSE
scatter3d(x = sep.l, y = pet.l, z = sep.w,
 point.col = "blue", surface=FALSE, 
 axis.scales = FALSE)

Mengubah Warna Aksis

Kita dapat mengubah warna aksis dengan menggunakan argument axis.col seperti berikut:

scatter3d(x = sep.l, y = pet.l, z = sep.w, groups = iris$Species,
 surface=FALSE, grid = FALSE, ellipsoid = TRUE,
 axis.col = c("black", "black", "black"))

Menambahkan Label untuk Titik

Kita dapat menambahkan label untuk titik dengan menggunakan argument labels seperti berikut:

scatter3d(x = sep.l, y = pet.l, z = sep.w, 
 surface=FALSE, labels = rownames(iris), id.n=nrow(iris))

Menyimpan Gambar

Kita dapat menyimpan gambar dengan menggunakan fungsi rgl.snapshot seperti berikut:

rgl.snapshot(filename = "plot.png")

Fungsi rgl.postscript juga dapat digunakan untuk menyimpan gambar dalam format ps, eps, tex, pdf, svg atau pgf.

rgl.postscript("plot.pdf", fmt="pdf")

Lihat Juga

Fungsi Identify3d dari library car memungkinkan kita untuk menambahkan label interaktif dengan menggunakan mouse.

Informasi

Analisis ini telah dilakukan menggunakan R software (ver. 3.1.2) dan car (ver. 2.0-25).

Tips

Jika Anda ingin mengembangkan artikel ini, silakan tinggalkan komentar di bawah!