resoudre en R
3x+1=e^x