File:From Continuous To Discrete Fourier Transform.gif
Iš Wikimedia Commons.
Pereiti į navigaciją
Jump to search
From_Continuous_To_Discrete_Fourier_Transform.gif (800 × 242 taškų, rinkmenos dydis: 15 KiB, MIME tipas: image/gif)
File information
Structured data
Captions
Aprašymas[keisti]
AprašymasFrom Continuous To Discrete Fourier Transform.gif |
English: Relationship between the (continuous) Fourier transform and the discrete Fourier transform.
|
Data | |
Šaltinis | Mano darbas |
Autorius | Sbyrnes321 |
(* Source code written in Mathematica 6.0, by Steve Byrnes, 2011. I release this code into the public domain. *) ClearAll["Global`*"] SetOptions[Plot, Frame -> True, FrameTicks -> None, Axes -> False, PlotRange -> {{-8, 8}, All}]; SetOptions[ListPlot, Frame -> True, FrameTicks -> None, Axes -> False, Filling -> Axis, PlotStyle -> None, PlotRange -> {{-8, 8}, All}]; f[x_] := Exp[-(4/3)*\[Pi] x^2]; g[x_] := Exp[-(3/4)*\[Pi] x^2]; repeatedf[x_, p_] := Sum[f[x + n*p], {n, -10, 10}]; repeatedg[x_, p_] := Sum[g[x + n*p], {n, -10, 10}]; plotf = Plot[f[x], {x, -10, 10}, PlotStyle -> Darker[Blue]]; plotg = Plot[g[x], {x, -10, 10}, PlotStyle -> Darker[Red]]; plotrepeatedf = Plot[repeatedf[x, 5], {x, -10, 10}, PlotStyle -> Darker[Blue]]; discreteg = Table[{x, g[x]}, {x, -10, 10, 1/5}]; plotdiscreteg = ListPlot[discreteg, FillingStyle -> Darker[Red]]; discretef = Table[{x, f[x]}, {x, -10, 10, 1/3}]; plotdiscretef = ListPlot[discretef, FillingStyle -> Darker[Blue]]; plotrepeatedg = Plot[repeatedg[x, 3], {x, -10, 10}, PlotStyle -> Darker[Red]]; discreterepeatedf = Table[{x, repeatedf[x, 11/4]}, {x, -12, 12, 1/4}]; plotdiscreterepeatedf = ListPlot[discreterepeatedf, FillingStyle -> Darker[Blue]]; discreterepeatedg = Table[{x, repeatedg[x, 4]}, {x, -12, 12, 4/11}]; plotdiscreterepeatedg = ListPlot[discreterepeatedg, FillingStyle -> Darker[Red]]; finalimg = Show[GraphicsGrid[{{plotf, plotrepeatedf, plotdiscretef, plotdiscreterepeatedf}, {plotg, plotdiscreteg, plotrepeatedg, plotdiscreterepeatedg}}], ImageSize -> 800] SetDirectory["C:\\Users\\Steve\\Desktop"]; Export["test.gif", finalimg]
Licencija[keisti]
Aš, šio darbo autoriaus teisių savininkas, publikuoju jį su šia licencija:
Šis failas prieinamas pagal Creative Commons CC0 1.0 Universal Public Domain Dedication. | |
Asmuo, kuris susiejo darbą su šiuo dokumentu, nusprendė darbą pateikti Commons, atsisakydamas visų savo autoriaus teisių į darbą visame pasaulyje bei visų susijusių ar gretutinių teisių, kurias jis ar ji turėjo, tiek, kiek leidžia įstatymas. Darbai pagal CC0 atsisakymą nereikalauja autoriaus paminėjimo. Kai darbas cituojamas (naudojamas kitur), neprivalote gauti autoriaus patvirtinimo.
http://creativecommons.org/publicdomain/zero/1.0/deed.enCC0Creative Commons Zero, Public Domain Dedicationfalsefalse |
Šis paveikslėlis math (arba visos šio straipsnio iliustracijos) turėtų būti iš naujo sukurtas naudojant vektorinę grafiką, kaip, pavyzdžiui, SVG failas. To privalumus ir daugiau informacijos rasite straipsnyje Commons:Media for cleanup. Jei šio failo SVG versija jau sukurta, prašome ją įkelti. Po įkėlimo šios iliustracijos puslapyje pakeiskite šį šabloną į {{vector version available|naujas paveikslėlio pavadinimas.svg}}.
|
Rinkmenos istorija
Paspauskite ant datos/laiko, kad pamatytumėte rinkmeną tokią, kokia ji buvo tuo metu.
Data/Laikas | Miniatiūra | Matmenys | Naudotojas | Paaiškinimas | |
---|---|---|---|---|---|
dabartinis | 18:18, 5 gruodžio 2011 | 800 × 242 (15 KiB) | Sbyrnes321 (aptarimas | indėlis) |
Jūs negalite perrašyti šios rinkmenos.
Rinkmenos naudojimas
Rinkmena nėra naudojama jokiame puslapyje.
Visuotinis rinkmenos naudojimas
Ši rinkmena naudojama šiose viki svetainėse:
- Naudojama ca.wikipedia.org
- Naudojama el.wikipedia.org
- Naudojama en.wikipedia.org
- Naudojama et.wikipedia.org
- Naudojama lt.wikipedia.org
- Naudojama pt.wikipedia.org
- Naudojama zh.wikipedia.org