xxxxxxxxxx
set_verbose(-1); var('x'); f=5^(x/(1-x^2))
st=r'$\displaystyle{f(x)=%s}$'%latex(f)
st1=r'$\displaystyle{\lim_{x\to-1^{-}}f(x)=%s;\;}$'\
%latex(limit(f,x=-1,dir='left'))
st2=r'$\displaystyle{\;\;\lim_{x\to-1^{+}}f(x)=%s}$'\
%latex(limit(f,x=-1,dir='right'))
st3=r'$\displaystyle{\lim_{x\to1^{-}}f(x)=%s;\;}$'\
%latex(limit(f,x=1,dir='left'))
st4=r'$\displaystyle{\;\;\lim_{x\to1^{+}}f(x)=%s}$'\
%latex(limit(f,x=1,dir='right'))
for el in [st,st1+st2,st3+st4]:
pretty_print(html(el))
p=plot(f,(-5,5),ymax=3)
p+=line([[-1,0],[-1,3]],color='slategray',
linestyle='--',thickness=2)
p+=line([[1,0],[1,3]],color='slategray',
linestyle='--',thickness=2)
p.show(frame=True,gridlines=True,figsize=(5,5))