x <- c(1, 2, 3, 4, 5) y <- c(2, 4, 6, 8, 10) plot(x, y, type = "b", main = "Mi Gráfico", xlab = "Eje X", ylab = "Eje Y", col = "yellow")