A 2-D plot

r=.1; d=1.5; n=50;
pa=Plot[-180/Pi PolygonSimpErr[n,r,d,θ,k],{θ,0,Pi/2}];
pb=Plot[-180/Pi VptDepSimpErr[n,r,d,θ,k],{θ,0,Pi/2}];
pc=Plot[-180/Pi SimpleImposterErr[n,r,d,θ,k],{θ,0,Pi/2}];
pd=Plot[-180/Pi MeshedImposterErr[n,r,d,θ,k],{θ,0,Pi/2}];
pe=Plot[-180/Pi IwDErr[n,r,d,θ,k],{θ,0,Pi/2}];