Ficheiro:Retarded time.webm
Saltar para a navegação
Saltar para a pesquisa
Retarded_time.webm (tamanho: 1,52 MB, tipo MIME: video/webm)
Descrição do ficheiro
| Descrição |
English: Signals (e.g. light) move at a finite speed, so there is a time lag between when they are emitted and when they are detected. If the source is moving, the detector will "see" the signal that was emitted at a previous time, not the signal that is being emitted right now, and this time lag can change with time in a complicated way.
(Notice that, as the source is always moving slower than the signal, the detector sees the signals in the same order they were emitted.) |
| Data | |
| Origem | https://mathstodon.xyz/@j_bertolotti/111346098723277032 |
| Autor | Berto |
| Permissão (Reutilizar este ficheiro) |
https://mathstodon.xyz/@j_bertolotti/111363365323269417 |
| WEBM desenvolvimento |
Mathematica 13.1 code
f[t_] := {Sin[2*2 \[Pi] t], Sin[2 \[Pi] t]}; p = {0, 1.2};
c = 15;
frames = Table[
tmp =
Table[Style[{tj, Norm[p - f[tj]]/c + tj }, Hue[tj]], {tj, -0.08, Min[t0, 0.6], 0.01}];
Grid[{{
ParametricPlot[f[t], {t, -0.08, 0.6}, PlotRange -> {{-1.5, 1.5}, {-0.5, 2.5}}, AspectRatio -> 1, PlotStyle -> {Thin, LightGray}, Axes -> False, Background -> Black, Epilog -> {Yellow, Disk[f[t0], 0.03], White, Disk[p, 0.03], Table[{Hue[tj], Circle[f[tj], c (t0 - tj)]}, {tj, -0.08, Min[t0, 0.6], 0.01}]}, ImageSize -> 300]
,
ListPlot[Select[tmp, (t0 >= #[[1, All]][[2]]) & ], Axes -> False, Frame -> True, PlotRange -> {{-0.1, 0.55}, {0, 0.68}}, FrameStyle -> Directive[Thick, White], Background -> Black, FrameTicks -> None, LabelStyle -> Medium, FrameLabel -> {"Time emitted", "Time detected"}, ImageSize -> 350]
}}, Background -> Black]
, {t0, -0.09, 0.61, 0.00201}];
ListAnimate[frames]
Licenciamento
Eu, titular dos direitos de autor desta obra, publico-a com a seguinte licença:
 
|
A utilização deste ficheiro é regulada nos termos Creative Commons - CC0 1.0 Dedicação Universal ao Domínio Público. |
| A pessoa que associou uma obra a este documento dedicou-a ao domínio público, renunciando a todos os seus direitos sobre a obra em todo o mundo ao abrigo da legislação de direitos de autor, incluindo a todos os direitos legais conexos, na medida permitida por lei. Pode copiar, modificar, distribuir e executar a obra, até com fins comerciais, sem pedir autorização.
|
Histórico do ficheiro
Clique uma data e hora para ver o ficheiro tal como ele se encontrava nessa altura.
| Data e hora | Dimensões | Utilizador | Comentário | |
|---|---|---|---|---|
| atual | 12h04min de 6 de novembro de 2023 | (1,52 MB) | wikimediacommons>Berto | Uploaded own work with UploadWizard |
Utilização local do ficheiro
A seguinte página usa este ficheiro: