Файл:EM-Wave.gif
Направо към навигацията
Направо към търсенето
Не е налична версия с по-висока разделителна способност.
EM-Wave.gif (627 × 522 пиксела, големина на файла: 848 КБ, MIME-тип: image/gif, зациклен, 31 кадъра, 3,1 сек)
Резюме
| Описание |
English: plane linearly polarized wave
Deutsch: linear polarisierte elektromagnetische Welle |
| Дата | |
| Източник | Собствена творба |
| Автор | And1mu |
Source Code
|
Script to create the animation: #!/bin/bash
set -eu
DIR="animate"
FILE="EM-Wave"
NUM=0
rm -f ${DIR}/frame???.png
for ANG in $(seq 0 0.05 1.5) ; do
echo "Creating frame $NUM ..."
POS=$ANG
echo $POS $ANG
sed -i "s/\\\def\\\myt{.\+}/\\\def\\\myt{$POS}/" ${FILE}.tex
pdflatex -shell-escape ${FILE}.tex 1> /dev/null
echo "Convert to png ..."
NUMSTR=$(printf "%03d" $NUM)
convert -density 200 ${FILE}.svg -shave 3 ${DIR}/frame${NUMSTR}.png
NUM=$(($NUM+1))
done
cd $DIR
convert -delay 10 -loop 10000 frame*.png ${FILE}.gif
cd -
The code to create a single frame (EM-Wave.tex): \documentclass[crop,border=15,tikz,convert={outext=.svg,command=\unexpanded{pdf2svg
\infile\space\outfile}},multi=false]{standalone}
\usepackage{tikz-3dplot}
\def\myt{0.5}
\def\mypi{3.141592653589793}
\tdplotsetmaincoords{70}{120}
\begin{document}
\begin{tikzpicture}[>=latex,scale=1,tdplot_main_coords]
\fill[white] (-4,-4.75,-5.5) rectangle (-4,4.5,3.25);
\draw[->] (0,0,0) -- (3,0,0) node[anchor=north east]{$z$};
\draw[->] (0,-1,0) -- (0,5.5,0) node[anchor=north west]{$x$};
\draw[->] (0,0,0) -- (0,0,3) node[anchor=south]{$y$};
\tdplotsetrotatedcoords{0}{90}{90}
\draw[thick,blue,smooth,domain=-1:5,samples=200,tdplot_rotated_coords] plot
function {2*sin(4*(x-\myt))};
\tdplotsetrotatedcoords{0}{0}{90}
\draw[thick,red,smooth,domain=-1:5,samples=200,tdplot_rotated_coords] plot
function {-2*sin(4*(x-\myt))};
%\tdplotsetrotatedcoords{0}{0}{0}
\foreach \a in {-1,-0.9,...,5}{
\def\E{{2*sin(4*180/\mypi*(\a-\myt))}}
\draw[blue] (0,\a,0) -- (0,\a,\E);
\draw[red] (0,\a,0) -- (\E,\a,0);
}
\draw[ultra thick,blue,->,tips=proper] (0,5,0) --
(0,5,{2*sin(4*180/\mypi*(5-\myt))}) node[anchor=west]{$\vec{E}$};
\draw[ultra thick,red,->,tips=proper] (0,5,0) --
({2*sin(4*180/\mypi*(5-\myt))},5,0) node[anchor=north west]{$\vec{B}$};
\end{tikzpicture}
\end{document}
|
Лицензиране
Аз, носителят на авторските права над тази творба, я публикувам тук под следния лиценз:
This file is licensed under the Creative Commons Attribution-Share Alike 4.0 International license.
- Можете свободно:
- да споделяте – да копирате, разпространявате и излъчвате произведението
- да ремиксирате – да адаптирате произведението
- Съгласно следните условия:
- признание на авторството – Трябва да посочите авторството, да добавите връзка към лиценза и да посочите дали са правени промени. Можете да направите това по всякакъв разумен начин, но не и по начин, оставящ впечатлението, че същият/същите подкрепят вас или използването по някакъв начин на творбата от вас.
- споделяне на споделеното – В случай, че промените, видоизмените или използвайки като основа произведението, го надградите, то полученото производно произведение може да се разпространява само съгласно условията на същия или съвместим лиценз с оригиналния такъв.
История на файла
Избирането на дата/час ще покаже как е изглеждал файлът към онзи момент.
| Дата/Час | Миникартинка | Размер | Потребител | Коментар | |
|---|---|---|---|---|---|
| текуща | 19:31, 14 май 2021 | | 627 × 522 (848 КБ) | wikimediacommons>Schwunkel | Reverted to version as of 18:31, 1 June 2017 (UTC) |
Използване на файла
Следната страница използва следния файл:
