Nama : Muhamad Fran Dahlan Gibran
NIM : 230605110127
Dosen Pengampu : Prof. Dr. Suhartono, M.Kom
Universitas : Universitas Islam Negeri Maulana Malik Ibrahim Malang
Fakultas : Sains dan Teknologi
Program Studi : Teknik Informatika

Kode R di atas membuat plot dari fungsi kuadrat � ( � ) = � � 2 f(x)=ax 2 , di mana � a adalah parameter yang dapat diubah. Kode tersebut tidak menggunakan library tambahan dan menggunakan fungsi dasar R untuk membuat dan memperbarui plot.

Fungsi ini mengambil nilai � x dan parameter � a dan mengembalikan hasil fungsi kuadrat.

Dengan menggunakan fungsi seq, kita menghasilkan deret nilai � x dari -10 hingga 10 dengan interval 0.1.

Fungsi plot digunakan untuk membuat plot awal fungsi kuadrat dengan � = 1 a=1.

Dalam loop, kita iteratif mengubah nilai parameter � a dan menambahkan kurva baru ke plot dengan menggunakan fungsi ‘lines’.

Fungsi legend digunakan untuk menambahkan legenda ke plot agar kita dapat melihat nilai � a yang sesuai dengan warna kurva.

# Function to be plotted (kuadrat dalam contoh ini)
f <- function(x, a) {
  return(a * x^2)
}

# Generate x values
x_values <- seq(-10, 10, by = 0.1)

# Create an initial plot
plot(x_values, f(x_values, 1), type = 'l', col = 'blue',
     main = "Plot of ax^2 Function", xlab = "x", ylab = "y")

# Iteratively update and plot (misalnya, dengan mengubah nilai 'a')
for (i in 2:6) {
  # Update the parameter 'a' (misalnya, dengan menambah 1)
  a <- i
  
  # Update and plot the function
  lines(x_values, f(x_values, a), col = i)
}

# Add a legend
legend("topright", legend = c("a=1", "a=2", "a=3", "a=4", "a=5"),
       col = 2:6, lty = 1)