%freq_resp.m

clear all
clc

R=100;
L=1;
num=[1];
den=[L/R 1];
G=tf(num,den)

figure(1)
bode(G)

ws=1