伝達関数から振幅特性のグラフを求めたい

伝達関数から振幅特性を求めたく、プログラムを作成しました。

それが、1つめの添付した写真です。

そして、2つめの図が実行結果です。

しかし、自分が求めていたものの図とはことなっています。自分が求めているのは３つめの添付図です。

何が違うのか教えてください。

伝達関数は、4つめの添付図です。

大変めんどくさいと思いますが、とても苦戦しているので、ご教授いただけるととてもたすかります。

よろしくお願いします。