Programa 1 Auto
Para comenzar anteriormente teniamos nuestra función de Transferencia la cual es:

$\mathbf{F\left ( t \right )=\tfrac{\frac{R_{e}}{K\Phi }}{T_{m}S}\left [ l_{e}S-l_{c}(S) \right ]}$

Nuestro programa en octave para la función de transferencia es el siguiente:

octave:1> den = [2 2];
octave:2> num = [3];
octave:3> sys = tf(num,den);
octave:4> step(sys)
octave:5> bode(sys)


Diagrama de bode:

También intente con otro código pero el cual no me graficaba nada :(