Berkas:Sawtooth Fourier Animation.gif

Konten halaman tidak didukung dalam bahasa lain.
Dari Wikipedia bahasa Indonesia, ensiklopedia bebas

Sawtooth_Fourier_Animation.gif(380 × 492 piksel, ukuran berkas: 226 KB, tipe MIME: image/gif, melingkar, 15 frame, 4,5 d)

Berkas ini berasal dari Wikimedia Commons dan mungkin digunakan oleh proyek-proyek lain. Deskripsi dari halaman deskripsinya ditunjukkan di bawah ini.

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.

Ringkasan

Deskripsi
English: Animation showing a Fourier series approximating a sawtooth wave (top), and the sinusoidal components that make up the series plotted together (bottom).
Tanggal
Sumber Karya sendiri. Created from scratch in Mathematica 8. Intended to replace File:Sawtooth Fourier Analysis.JPG.
Pembuat 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]

Lisensi

Saya, pemilik hak cipta dari karya ini, dengan ini menerbitkan berkas ini di bawah ketentuan berikut:
w:id:Creative Commons
atribusi berbagi serupa
Berkas on ipartandoan sian on Creative Commons Attribution-Share Alike 3.0 Unported partadoan.
Anda diizinkan:
  • untuk berbagi – untuk menyalin, mendistribusikan dan memindahkan karya ini
  • untuk menggubah – untuk mengadaptasi karya ini
Berdasarkan ketentuan berikut:
  • atribusi – Anda harus mencantumkan atribusi yang sesuai, memberikan pranala ke lisensi, dan memberi tahu bila ada perubahan. Anda dapat melakukannya melalui cara yang Anda inginkan, namun tidak menyatakan bahwa pemberi lisensi mendukung Anda atau penggunaan Anda.
  • berbagi serupa – Apabila Anda menggubah, mengubah, atau membuat turunan dari materi ini, Anda harus menyebarluaskan kontribusi Anda di bawah lisensi yang sama seperti lisensi pada materi asli.

Captions

Add a one-line explanation of what this file represents

Items portrayed in this file

menggambarkan

20 Februari 2012

Riwayat berkas

Klik pada tanggal/waktu untuk melihat berkas ini pada saat tersebut.

Tanggal/WaktuMiniaturDimensiPenggunaKomentar
terkini20 Februari 2012 22.58Miniatur versi sejak 20 Februari 2012 22.58380 × 492 (226 KB)4dhayman~commonswiki

Halaman berikut menggunakan berkas ini:

Penggunaan berkas global

Metadata