In[]:=
f[t_]:=UnitStep[t+1]
In[]:=
Plot[f[t],{t,-10,10}]
Out[]=
In[]:=
F=LT[UnitStep[t+2],t,s]
Out[]=
ConditionalExpression,Re[s]>0
2s
s
In[]:=
Block[{s=σ+Iω},Table[plot[Abs[F],{σ,-20,20},{ω,-20,20},PlotRangeFull],{plot,{Plot3D,ContourPlot,DensityPlot}}]]
Out[]=
,
,