Oitava Região

# Seu código R aqui

x <- seq(-2, 2, length.out = 100)
y <- exp(x)  # Função exponencial e^x

plot(x, y, type = "l", main = "Função Exponencial: y = e^x",
     xlab = "x", ylab = "y = e^x", col = "blue", lwd = 2)

grid()  # Adiciona grid