Ficheiro:Sawtooth Fourier Animation.gif
Fonte: testwiki
Saltar para a navegação
Saltar para a pesquisa
Sawtooth_Fourier_Animation.gif (380 × 492 píxeis, tamanho: 226 kB, tipo MIME: image/gif, cíclico, 15 quadros, 4,5 s)
Este ficheiro vem da wiki na wiki Wikimedia Commons e pode ser usado por outros projetos. A descrição na página original de descrição do ficheiro é mostrada abaixo.
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. |
Descrição do ficheiro
| DescriçãoSawtooth Fourier Animation.gif |
English: Animation showing a Fourier series approximating a sawtooth wave (top), and the sinusoidal components that make up the series plotted together (bottom). |
| Data | |
| Origem | Obra do próprio. Created from scratch in Mathematica 8. Intended to replace File:Sawtooth Fourier Analysis.JPG. |
| Autor | 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]
Licenciamento
Eu, titular dos direitos de autor desta obra, publico-a com a seguinte licença:
A utilização deste ficheiro é regulada nos termos da licença Creative Commons - Atribuição-CompartilhaIgual 3.0 Não Adaptada.
- Pode:
- partilhar – copiar, distribuir e transmitir a obra
- recombinar – criar obras derivadas
- De acordo com as seguintes condições:
- atribuição – Tem de fazer a devida atribuição da autoria, fornecer uma hiperligação para a licença e indicar se foram feitas alterações. Pode fazê-lo de qualquer forma razoável, mas não de forma a sugerir que o licenciador o apoia ou subscreve o seu uso da obra.
- partilha nos termos da mesma licença – Se remisturar, transformar ou ampliar o conteúdo, tem de distribuir as suas contribuições com a mesma licença ou uma licença compatível com a original.
Legendas
Adicione uma explicação de uma linha do que este ficheiro representa
Elementos retratados neste ficheiro
retrata
Um valor sem um elemento no repositório Wikidata
20 fevereiro 2012
Histórico do ficheiro
Clique uma data e hora para ver o ficheiro tal como ele se encontrava nessa altura.
| Data e hora | Miniatura | Dimensões | Utilizador | Comentário | |
|---|---|---|---|---|---|
| atual | 23h58min de 20 de fevereiro de 2012 | 380 × 492 (226 kB) | wikimediacommons>4dhayman~commonswiki |
Utilização local do ficheiro
A seguinte página usa este ficheiro:
