1.5 Obtain the poles and zeros of a transfer function

Problem: Find the zeros, poles, and gain for the continuous time system defined by the transfer function \[ H(s)=\frac {25}{s^{2}+4s+25}\]

Mathematica

Clear["Global`*"]; 
sys=TransferFunctionModel[25/(s^2+4 s+25),s]; 
TransferFunctionZeros[sys]
 

             {{{}}}
 

 

TransferFunctionPoles[sys]//N
 

{{{-2.-4.58258 I,-2.+4.58258 I}}}
 

 

Matlab

clear all; 
s = tf('s'); 
sys = 25/(s^2+4*s+25); 
[z,p,k] =zpkdata(sys,'v')
 

z = 
   Empty matrix: 0-by-1 
 
p = 
  -2.0000 + 4.5826i 
  -2.0000 - 4.5826i
 

 

Maple

restart; 
alias(DS=DynamicSystems): 
sys:=DS:-TransferFunction(25/(s^2+4*s+25)): 
r  :=DS:-ZeroPolePlot(sys,output=data): 
zeros  := r[1]; 
poles  := r[2];
 

zeros:= [] 
poles:= [-2.000000000-4.582575695*I, 
         -2.+4.582575695*I]