%%Gives phase shift as function of frequency for specific R and C values

 f=1:10:10^8;
 phase=2*atan(2.0*pi*f*100e3*10e-12);
 phase_deg=phase*180/pi;
 semilogx(f,phase_deg);