Файл:Sawtooth Fourier Animation.gif

Матеріал з Вікіпедії — вільної енциклопедії.
Перейти до навігації Перейти до пошуку

Sawtooth_Fourier_Animation.gif(380 × 492 пікселів, розмір файлу: 226 КБ, MIME-тип: image/gif, кільцеве, 15 кадрів, 4,5с)

Wikimedia Commons logo Відомості про цей файл містяться на Вікісховищі — централізованому сховищі вільних файлів мультимедіа для використання у проектах Фонду Вікімедіа.
This image could be re-created using vector graphics as an SVG file. This has several advantages; see Commons:Media for cleanup for more information. If an SVG form of this image is available, please upload it and afterwards replace this template with {{vector version available|new image name}}. It is recommended to name the SVG file "Sawtooth Fourier Animation.svg" - then the template Vector version available (or Vva) does not need the new image name parameter.

Опис файлу

Опис
English: Animation showing a Fourier series approximating a sawtooth wave (top), and the sinusoidal components that make up the series plotted together (bottom).
Час створення
Джерело Власна робота. Created from scratch in Mathematica 8. Intended to replace File:Sawtooth Fourier Analysis.JPG.
Автор 4dhayman
(*Mathematica code to generate diagram and export it as an animated GIF*)
Export["Sawtooth_Fourier_Animation.gif", 
 Table[GraphicsColumn[{Show[
     Plot[2 ((1/2) - (1/Pi)*
           Sum[(1/n)*Sin[n*Pi*x*2], {n, 1, steps}]) - 1, {x, 0, 2}, 
      PlotStyle -> {Thick, Blue}], 
     Plot[2 SawtoothWave[x] - 1, {x, 0, 2}, 
      ExclusionsStyle -> {Dashing[Large], Thick, Black}, 
      PlotStyle -> {Thick, Black}], 
     Graphics[
      Text[Style["k = " <> ToString[steps], Bold, FontSize -> 18, 
        FontFamily -> "Helvetica"], {1.65, 1.1}]], 
     LabelStyle -> {FontSize -> 18, FontFamily -> "Helvetica"}, 
     AxesOrigin -> {0, -1.1}, AxesLabel -> {"x", "y"}, 
     ImageSize -> Scaled[.8], PlotRange -> {{0, 2}, {-1.1, 1.2}}], 
    Plot[Evaluate[
      2 ((1/2) - (1/Pi)*
           Table[(1/n)*Sin[n*Pi*x*2], {n, 1, steps, 1}]) - 1], {x, 0, 
      2}, PlotStyle -> ({Thick, Blue, #} & /@ 
        Table[Opacity[If[i == 1, 1, 1 - i/(steps + 1)]], {i, 1, steps,
           1}]), LabelStyle -> {FontSize -> 18, 
       FontFamily -> "Helvetica"}, AxesOrigin -> {0, -1.1}, 
     AxesLabel -> {"x", "y"}, ImageSize -> Scaled[.8], 
     PlotRange -> {{0, 2}, {-1.1, 1.2}}]}], {steps, 1, 15}], 
 "DisplayDurations" -> 0.3]

Ліцензування

Я, власник авторських прав на цей твір, добровільно публікую його на умовах такої ліцензії:
w:uk:Creative Commons
зазначення авторства поширення на тих же умовах
Цей файл ліцензований на умовах Creative Commons Attribution-Share Alike 3.0 Unported
Ви можете вільно:
  • ділитися – копіювати, поширювати і передавати твір
  • модифікувати – переробляти твір
При дотриманні таких умов:
  • зазначення авторства – Ви повинні вказати авторство, надати посилання на ліцензію і вказати, чи якісь зміни було внесено до оригінального твору. Ви можете зробити це в будь-який розсудливий спосіб, але так, щоб він жодним чином не натякав на те, наче ліцензіар підтримує Вас чи Ваш спосіб використання твору.
  • поширення на тих же умовах – Якщо ви змінюєте, перетворюєте або створюєте іншу похідну роботу на основі цього твору, ви можете поширювати отриманий у результаті твір тільки на умовах такої ж або сумісної ліцензії.

Підписи

Додайте однорядкове пояснення, що саме репрезентує цей файл

Об'єкти, показані на цьому файлі

зображує

Якесь значення без елемента на сайті Вікідані

Історія файлу

Клацніть на дату/час, щоб переглянути, як тоді виглядав файл.

Дата/часМініатюраРозмір об'єктаКористувачКоментар
поточний22:58, 20 лютого 2012Мініатюра для версії від 22:58, 20 лютого 2012380 × 492 (226 КБ)4dhayman~commonswiki

Така сторінка використовує цей файл:

Глобальне використання файлу

Цей файл використовують такі інші вікі:

Метадані