[Concorso] TikZ nella gallery del sito

Ottima idea, Roberto; non vedo l’ora di vedere che cosa i frequentatori del forum presenteranno. 🙂

E la giuria sarà composta da…? Giusto per sapere chi si deve corrompere 😀

Suppongo che i codici debbano essere in qualche modo originali, corretto? Su internet si trovano tantissimi esempi di esempi TikZ stupefacenti già pronti. Se trovo qualche figura che ho realizzato degna di nota parteciperò molto volentieri! Anche se ho già in mente almeno un paio di utenti di questo forum che potrebbero vincere il concorso a mani basse 😛

Se ben ricordo, ho già vinto il concorso di TikZ dello scorso anno 🙂

Quindi mi candido per la giuria 😉 (se Roberto è d’accordo beneinteso)

Ciao
Claudio

Un disegno che ho realizzato per illustrare la geometria di un’eclisse, con un pianeta che occulta la sua stella. Non credo sia l’esempio più bello possibile, però mi piace la sua relativa semplicità del codice:
`\documentclass[tikz]{standalone}
\usepackage[light]{kpfonts}
\usetikzlibrary{calc,intersections}
\begin{document}
\begin{tikzpicture}
\coordinate (O1) at (0,0); % centro stella
\coordinate (O2) at (2.5,0); % centro pianeta
\draw[name path=S,thick] (O1) circle (2); % disco stella (r=2)
\draw[name path=P,thick] (O2) circle (1); % disco pianeta (r=1)
% individuo punti di intersezione fra dischi di pianeta e stella
\path[name intersections={of=S and P,by={A,B}}];
\draw[dashed] (O1) — (A) — (O2) — node[below,sloped] {$r_2$} (B) —
node[above,sloped] {$r_1$} (O1);
\draw (A) — (B);
\draw[->] ($(B) – (0,0.5)$) node[left,fill=white,inner sep=0.4] {$S_1$} to
[out=45,in=-80] (1.9,-0.1);
\draw[->] ($(A) + (0,0.5)$) node

{$S_2$}
to[out=180] (1.7,0.1);
\draw[red,thick] let \n1 = {acos((1-4+2.5*2.5)/(2*1*2.5))} in
($(O2) – cos(\n1)*(0.2,0) + sin(\n1)*(0,0.2)$) arc
(180-\n1:180+\n1:0.2);
\draw[->] ($(O2) + (-0.2,0.5)$) node[red,right] {$\theta_2$}
to[out=180,in=180] (2.3,0);
\draw[blue,thick] let \n2 = {acos((4-1+2.5*2.5)/(2*2*2.5))} in
($(O1) + cos(\n2)*(0.3,0) – sin(\n2)*(0,0.3)$) arc (-\n2:\n2:0.3);
\draw[->] ($(O1) + (0.5,-0.5)$) node[blue,below] {$\theta_1$} to[in=0] (0.3,0);
\end{tikzpicture}
\end{document}`

Sperando che non venga interpretato come un doppio codice e quindi motivo di esclusione dalla gara (:D), riporto anche una versione che fa uso del pacchetto [tt]tkz-euclide[/tt] che evita qualche noioso conto manuale degli arcocoseni.

`\documentclass[tikz]{standalone}
\usepackage[light]{kpfonts}
\usepackage{tkz-euclide}
\usetikzlibrary{calc}
\usetkzobj{all}
\begin{document}
\begin{tikzpicture}
\tkzDefPoint (0,0){A} % centro stella
\tkzDefPoint(2.5,0){B} % centro pianeta
\tkzDrawCircle[R,thick](A,2 cm) % disco stella (r=2)
\tkzDrawCircle[R,thick](B,1 cm) % disco pianeta (r=1)
% individuo punti di intersezione fra dischi di pianeta e stella
\tkzInterCC[R](A,2 cm)(B,1 cm)
\tkzGetPoints{C}{D}
\draw[dashed] (A) — (C) — (B) — node[below,sloped] {$r_2$} (D) —
node[above,sloped] {$r_1$} (A);
\draw (C) — (D);
\draw[->] ($(D) – (0,0.5)$) node[left,fill=white,inner sep=0.4] {$S_1$} to
[out=45,in=-80] (1.9,-0.1);
\draw[->] ($(C) + (0,0.5)$) node

{$S_2$} to[out=180] (1.7,0.1);
\tkzFindAngle(D,B,C)
\tkzGetAngle{thetauno}
\draw[red,thick] ($(B) + cos(\thetauno/2)*(0.2,0) + sin(\thetauno/2)*(0,0.2)$)
arc (\thetauno/2:360-\thetauno/2:0.2);
\draw[->] ($(B) + (-0.2,0.5)$) node[red,right] {$\theta_2$}
to[out=180,in=180] (2.3,0);
\tkzFindAngle(D,A,C)
\tkzGetAngle{thetadue}
\draw[blue,thick] ($(A) + cos(\thetadue/2)*(0.3,0) + sin(\thetadue/2)*(0,0.3)$)
arc (\thetadue/2:-\thetadue/2:0.3);
\draw[->] ($(A) + (0.5,-0.5)$) node[blue,below] {$\theta_1$} to[in=0] (0.3,0);
\end{tikzpicture}
\end{document}`

Solo un contributo? 🙁

@Roberto: perché non estendere la deadline?

Ciao
Claudio

cfiandra” post=92970 @Roberto: perché non estendere la deadline?

Appoggio la proposta 🙂

Purtroppo solo ora ho a disposizione un pc per scriver un post sul forum e non ho fatto in tempo a per la gara ma mi piacerebbe mostrare un piccolo disegno che ho fatto ieri.
Per la realizzazione ho preso spunto da un esempio presente sull’Artetikz. Sono orgoglioso di questo disegno per la relativa compattezza del codice (certamente migliorabile):`\documentclass[tikz]{standalone}
\begin{document}
\begin{tikzpicture}
\draw [ultra thick] (-8,0) — (8,0);
\draw [ultra thick] (0,0) circle (8);
\foreach \i in {0,1,2,3} {%
\draw [ultra thick] (90*\i:8) arc (270+90*\i:180+90*\i:8);}
\foreach \i in {0,1,…,7} {%
\draw [very thick] (45*\i:8) arc (270+45*\i:135+45*\i:3.3);}
\foreach \i in {0,1,…,15} {%
\draw [thick] (22.5*\i:8) arc (270+22.5*\i:112.5+22.5*\i:1.6);}
\foreach \i in {0,1,…,31} {%
\draw [thin] (11.25*\i:8) arc (270+11.25*\i:101.25+11.25*\i:0.8);}
\foreach \i in {0,1,…,63} {%
\draw [ultra thin] (5.625*\i:8) arc (270+5.625*\i:95.625+5.625*\i:0.4);}
\end{tikzpicture}
\end{document}`Ciao
Marco

marchetto” post=92973Purtroppo solo ora ho a disposizione un pc per scriver un post sul forum e non ho fatto in tempo a per la gara ma mi piacerebbe mostrare un piccolo disegno che ho fatto ieri.
Per la realizzazione ho preso spunto da un esempio presente sull’Artetikz. Sono orgoglioso di questo disegno per la relativa compattezza del codice (certamente migliorabile):`\documentclass[tikz]{standalone}
\begin{document}
\begin{tikzpicture}
\draw [ultra thick] (-8,0) — (8,0);
\draw [ultra thick] (0,0) circle (8);
\foreach \i in {0,1,2,3} {%
\draw [ultra thick] (90*\i:8) arc (270+90*\i:180+90*\i:8);}
\foreach \i in {0,1,…,7} {%
\draw [very thick] (45*\i:8) arc (270+45*\i:135+45*\i:3.3);}
\foreach \i in {0,1,…,15} {%
\draw [thick] (22.5*\i:8) arc (270+22.5*\i:112.5+22.5*\i:1.6);}
\foreach \i in {0,1,…,31} {%
\draw [thin] (11.25*\i:8) arc (270+11.25*\i:101.25+11.25*\i:0.8);}
\foreach \i in {0,1,…,63} {%
\draw [ultra thin] (5.625*\i:8) arc (270+5.625*\i:95.625+5.625*\i:0.4);}
\end{tikzpicture}
\end{document}`Ciao
Marco

In effetti sono uno dei 12 che ti ha votato! 🙂 Mi è piaciuto molto l’algoritmo che hai usato.

Ciao
Claudio

cfiandra” post=92974

Purtroppo solo ora ho a disposizione un pc per scriver un post sul forum e non ho fatto in tempo a per la gara ma mi piacerebbe mostrare un piccolo disegno che ho fatto ieri.
Per la realizzazione ho preso spunto da un esempio presente sull’Artetikz. Sono orgoglioso di questo disegno per la relativa compattezza del codice (certamente migliorabile):`\documentclass[tikz]{standalone}
\begin{document}
\begin{tikzpicture}
\draw [ultra thick] (-8,0) — (8,0);
\draw [ultra thick] (0,0) circle (8);
\foreach \i in {0,1,2,3} {%
\draw [ultra thick] (90*\i:8) arc (270+90*\i:180+90*\i:8);}
\foreach \i in {0,1,…,7} {%
\draw [very thick] (45*\i:8) arc (270+45*\i:135+45*\i:3.3);}
\foreach \i in {0,1,…,15} {%
\draw [thick] (22.5*\i:8) arc (270+22.5*\i:112.5+22.5*\i:1.6);}
\foreach \i in {0,1,…,31} {%
\draw [thin] (11.25*\i:8) arc (270+11.25*\i:101.25+11.25*\i:0.8);}
\foreach \i in {0,1,…,63} {%
\draw [ultra thin] (5.625*\i:8) arc (270+5.625*\i:95.625+5.625*\i:0.4);}
\end{tikzpicture}
\end{document}`Ciao
Marco

In effetti sono uno dei 12 che ti ha votato! 🙂 Mi è piaciuto molto l’algoritmo che hai usato.

Ciao
Claudio

Grazie Claudio! Mi fa molto piacere.

Grazie per la valutazione 😀 e soprattutto per la possibilità di inserire un mio disegno nella Gallery del sito ufficiale del sito.

Complimenti a Elrond per il suo disegno di qualità

Ciao
Marco

Onore ai vincitori!! 🙂

Ora che il concorso è finito, posso svelare cosa avrei presentato se avessi partecipato. L’idea non è proprio originale (vedi qui), ma è originale la colorazione 😉 `
\documentclass

{standalone}
\usepackage{tikz}

\usetikzlibrary{lindenmayersystems,shadows}

\pgfdeclarelindenmayersystem{Sierpinski triangle}{
\symbol{X}{\pgflsystemdrawforward}
\symbol{Y}{\pgflsystemdrawforward}
\rule{X -> X-Y+X+Y-X}
\rule{Y -> YY}
}%

\tikzset{
l-system={step=2cm/(2^4),
order=4,
angle=-120},
Sierpinski shadow/.style={
drop shadow={%
shadow xshift=.1ex,
shadow yshift=-.1ex
}
}
}

\begin{document}%

\begin{tikzpicture}
\clip [inner color=green!80!black,
outer color=orange]
(0,0) — ++(0:2cm) — ++(120:2cm) — cycle;
\path (0,0) l-system
[l-system={Sierpinski triangle, axiom=X},
inner color=orange!20,
outer color=yellow,
Sierpinski shadow];
\end{tikzpicture}

\end{document}
`

[attachment=970]ScreenShot2014-03-25at7.30.46AM.png[/attachment]

Ciao
Claudio

robitex” post=93166Poichè il punteggio assegnato ai due lavori è risultato perfettamente identico, i vincitori sono Elrond e Marchetto a pari merito, il primo per aver sottolineato le possibilità offerte da TikZ nel lavoro di illustrazione ed il secondo per aver scelto un codice semplice ma espressivo delle potenzialità sintattiche del pacchetto

Grazie, ma sinceramente dopo aver visto l’altro contributo mi sarei aspettato un risultato diverso, davanti alla ricorsione c’è poco da competere. 😳 Complimenti marchetto!