plot y = VectorAngle[{1,3,1},{x+1,0,-1}], y = pi/4