R1=3.3e+3;
C1=0.01e-6;
C2=0.01e-6;

hold off

for R2=[1000 5000 6000 7000 8000 50e+3 100e+3];
H=tf([1 0 0], [1 (R1*(C1+C2))/(R1*R2*C1*C2) 1/(R1*R2*C1*C2)]);
h=bodeplot(H);
setoptions(h,'PhaseVisible', 'off');

grid on
hold on
end

legend('R2=1000','R2=5000','R2=6000','R2=7000','R2=8000','R2=50000','R2=100000');

%{
h=bodeplot(H);
setoptions(h,'FreqUnits','Hz','PhaseVisible', 'off');
%}