08.11.2018 Views

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

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!