Kustomisasi Parameter Grafik Menambahkan Legend dalam Mengkustomisasi Grafi

Nama : Ferdian Surya Agung

NIM : 230605110075

Prodi: Teknik Informatika

Fakultas: Fakultas Sains dan Teknologi

Universitas: UIN Maulana Malik Ibrahim Malang

Mata Kuliah: Kalkulus

Dosen Pengampu: Prof. Dr. Suhartono, M.Kom.

Fungsi legend() pada R dapat digunakan untuk menambahkan legend pada grafik. Format sederhananya adalah sebagai berikut:

Berikut adalah contoh sintaks dan ouput penerapan argumen :

# membuat vektor numerik
  x <- c(1:10)
  y <- x^2
  z <- x*2

# membuat line plot
  plot(x,y, type="o", col="red", lty=1)

# menambahkan line plot
  lines(x,z, type="o", col="blue", lty=2)

# menambahkan legend
  legend(1, 95, legend=c("Line 1", "Line 2"),
      col=c("red", "blue"), lty=1:2, cex=0.8)

Dapat menambahkan judul, merubah font, dan merubah warna backgroud pada legend. Argumen yang ditambahkan pada legend adalah sebagai berikut:

title: Judul legend

text.font: integer yang menunjukkan font style pada teks legend. Nilai yang dapat dimasukkan adalah sebagai berikut: 1: normal 2: cetak tebal 3: cetak miring 4: cetak tebal dan miring.

bg: warna background legend box.

Berikut adalah penerapan sintaks dan output :

# membuat line plot
  plot(x,y, type="o", col="red", lty=1)

# menambahkan line plot
  lines(x,z, type="o", col="blue", lty=2)

# menambahkan legend
  legend(1, 95, legend=c("Line 1", "Line 2"),
      col=c("red", "blue"), lty=1:2, cex=0.8,
      title="Line types", text.font=4, bg='lightblue')

Selain menggunakan koordinat, kita juga dapat melakukan kustomisasi posisi legend menggunakan keyword seperti: bottomright“,”bottom“,”bottomleft“,”left“,”topleft“,”top“,”topright“,”right” and “center”. Sejumlah kustomisasi legend berdasarkan keyword :

# plot
  plot(x,y, type = "n")

# posisi kiri atas, inset =0.05
  legend("topleft",
    legend = "(x,y)",
    title = "topleft, inset = .05",
    inset = 0.05)
# posisi atas
  legend("top",
    legend = "(x,y)",
    title = "top")
# posisi kanan atas inset = .02
  legend("topright",
    legend = "(x,y)",
    title = "topright, inset = .02",
    inset = 0.02)
# posisi kiri
  legend("left",
    legend = "(x,y)",
    title = "left")
# posisi tengah
  legend("center",
    legend = "(x,y)",
    title = "center")
# posisi kanan
  legend("right",
    legend = "(x,y)",
    title = "right")
# posisi kiri bawah
  legend("bottomleft",
    legend = "(x,y)",
    title = "bottomleft")
# posisi bawah
  legend("bottom",
    legend = "(x,y)",
    title = "bottom")
# posisi kanan bawah
  legend("bottomright",
    legend = "(x,y)",
    title = "bottomright")