representacion-de-senales-en-wolfram-mathematica (1)
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
6 Lab1.nb<br />
In[78]:=<br />
h = (2)^n UnitStep[-n];<br />
función paso unidad<br />
Z =<br />
UnitStep[n];<br />
función paso unidad<br />
DiscreteConvolve[h, Z, n, m]<br />
convolución discreta<br />
DiscretePlot[%, {m, -10, 10}]<br />
repres<strong>en</strong>tación discreta<br />
Out[80]= 2 m ≥ 0<br />
2 1+m True<br />
2.0<br />
1.5<br />
Out[81]=<br />
1.0<br />
0.5<br />
-10 -5 5 10<br />
Integral <strong>de</strong> convolución<br />
In[40]:= h = Exp[-2 x] UnitStep[x];<br />
expon<strong>en</strong>cial función paso unidad<br />
Out[41]=<br />
Convolve[h, UnitStep[x], x, y]<br />
convoluciona función paso unidad<br />
Plot[%, {y, 0, 10}, PlotRange → All]<br />
repres<strong>en</strong>tación gráfica rango <strong>de</strong> repr⋯ todo<br />
e -y Sinh[y] UnitStep[y]<br />
0.5<br />
0.4<br />
0.3<br />
Out[42]=<br />
0.2<br />
0.1<br />
2 4 6 8 10<br />
Printed by Wolfram Mathematica Stu<strong>de</strong>nt Edition