Tracé de cercles de Ford

Tout ce qui concerne l'utilisation ou l'installation de LaTeX.

Modérateur: gdm_tex

Règles du forum
Merci d'éviter le style SMS dans vos messages et de penser à utiliser la fonction Recherche avant de poster un message. Pour joindre des fichiers à vos messages, consulter ce sujet.
> Penser à utiliser les balises Code pour poster du code.

Re: Tracé de cercles de Ford

Messagepar Altermundus » Dimanche 01 Mars 2009, 22:15

Un peu mieux avec la couleur

Code: Tout sélectionner
\documentclass{article}
\usepackage[dvipsnames]{xcolor}
\usepackage{tikz}

\newcommand{\drawcircle}[3]{%
   \pgfmathparse{1/(2*#2*#2)}
   \let\tempradius\pgfmathresult
   \draw[fill=#3] (#1/#2,\tempradius) circle (\tempradius);
}

\begin{document}

\def\fordN{5}
\def\fordA{0}
\def\fordB{1}
\def\fordC{1}
\let\fordD\fordN
\begin{center}\begin{tikzpicture}[scale=4]

\drawcircle{\fordA}{\fordB}{red}
\foreach \i/\c in {0/blue,1/yellow,2/green,3/magenta,4/orange,5/magenta,6/green,7/yellow,8/blue,9/red}{%
  \pgfmathparse{\fordN+\fordB}\global\let\fordK\pgfmathresult
 \pgfmathparse{floor(\fordK/\fordD)}\global\let\fordK\pgfmathresult
 \pgfmathparse{\fordK*\fordC}\global\let\fordE\pgfmathresult
 \pgfmathparse{\fordE-\fordA}\global\let\fordE\pgfmathresult
 \pgfmathparse{\fordK*\fordD}\global\let\fordF\pgfmathresult
 \pgfmathparse{\fordF-\fordB}\global\let\fordF\pgfmathresult
 \global\let\fordA\fordC
 \global\let\fordB\fordD
 \global\let\fordC\fordE
 \global\let\fordD\fordF
 \drawcircle{\fordA}{\fordB}{\c}
}

\end{tikzpicture}\end{center}
\end{document}


Alain Matthes
Fichiers joints
ford_circles.png
Altermundus
Giga-utilisateur
 
Messages: 557
Inscription: Lundi 28 Mai 2007, 09:31
Localisation: Paris
Statut actuel: Actif et salarié | Enseignant

Publicité

Re: Tracé de cercles de Ford

Messagepar evariste_G » Mardi 03 Mars 2009, 21:10

Ah, c'est excellent ! C'est exactement ce que je voulais :D Merci !
Mathématiques, LaTeX et Python : http://www.mathweb.fr
Cours particuliers de maths et de NSI : https://cours-particuliers-bordeaux.fr/
evariste_G
Téra-utilisateur
 
Messages: 1427
Inscription: Vendredi 19 Décembre 2008, 19:13
Localisation: Bordeaux
Statut actuel: Actif et salarié | Enseignant

Précédente

Retourner vers LaTeX

 


  • Articles en relation
    Réponses
    Vus
    Dernier message

Qui est en ligne

Utilisateurs parcourant ce forum: Bing [Bot], Google Adsense [Bot], Grapeshot [Crawler] et 10 invités