Source de diagbat.tex

$Fichier TeX$
% Utilisation du package PicTeX
%
\documentclass[a4paper]{article}
\usepackage[applemac]{inputenc} % pour MAC
% \usepackage[latin1]{inputenc} % pour Linux ou Windows
\usepackage{rawfonts,pictex}
\usepackage[dvips]{graphics,color}
\usepackage{palatino}
\pagestyle{empty}

\begin{document}

Voici une répartition de notes sous forme d'histogramme. Suivant le 
type d'usage (en particulier impression noir \& blanc ou couleur) on 
peut utiliser des niveaux de gris ou la couleur.

\section{En niveaux de gris}

\definecolor{gris1}{gray}{0.9}
\definecolor{gris2}{gray}{0.6}
\beginpicture
  \normalgraphs
  \setcoordinatesystem units <.5cm,.5cm>
  \setplotarea x from 0 to 20, y from 0 to 10
  \longticklength=3pt
  \setbars <-2pt,0pt> breadth <0pt> baseline at y = 0
  {\linethickness=4pt
  \color{gris1}
  \plot "notest1me.txt"}
  \setbars <2pt,0pt> breadth <0pt> baseline at y = 0
  {\linethickness=4pt
  \color{gris2}
  \plot "notest1mo.txt"}
  \color{black}
  \axis bottom label {Notes {\color{gris1}\'ecrit}$/${\color{gris2}oral}} 
  ticks numbered from 0 to 20 by 1 /
  \axis left label \rotatebox{90}{effectif}
  ticks numbered from 0 to 10 by 1 /
\endpicture

\section{En couleur}

\beginpicture
  \normalgraphs
  \setcoordinatesystem units <.5cm,.5cm>
  \setplotarea x from 0 to 20, y from 0 to 10
  \longticklength=3pt
  \setbars <-2pt,0pt> breadth <0pt> baseline at y = 0
  {\linethickness=4pt
  \color{red}
  \plot "notest1me.txt"}
  \setbars <2pt,0pt> breadth <0pt> baseline at y = 0
  {\linethickness=4pt
  \color{blue}
  \plot "notest1mo.txt"}
  \color{black}
  \axis bottom label {Notes {\color{red}\'ecrit}$/${\color{blue}oral}} 
  ticks numbered from 0 to 20 by 1 /
  \axis left label \rotatebox{90}{effectif}
  ticks numbered from 0 to 10 by 1 /
\endpicture

\end{document}
— Syracuse — Dernière modification : 17 janvier 2002 (0.07s - 3946072 - 7 janvier 2009)