plot[tan(y),1/y, {y,0,20}]