Mi primera grƔfica de asƭntotas

Este documento es el primero que publico en RPups u esta es mi primera gƔfica de asƭntotas:

x<-seq(-5, 5, 0.1)
gx<-(2*x^2)/(x^2-4)
plot(x,gx, type="o", col = "blue") + abline(h = 1, v = c(-2,2), col = "red")

## integer(0)

fuente: ElaboraciĆ³n propia