texlive[68219] Master: tkz-bernoulli (9sep23)
commits+karl at tug.org
commits+karl at tug.org
Sat Sep 9 22:08:38 CEST 2023
Revision: 68219
http://tug.org/svn/texlive?view=revision&revision=68219
Author: karl
Date: 2023-09-09 22:08:38 +0200 (Sat, 09 Sep 2023)
Log Message:
-----------
tkz-bernoulli (9sep23)
Modified Paths:
--------------
trunk/Master/tlpkg/bin/tlpkg-ctan-check
trunk/Master/tlpkg/libexec/ctan2tds
trunk/Master/tlpkg/tlpsrc/collection-pictures.tlpsrc
Added Paths:
-----------
trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/
trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/README.md
trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/tkz-bernoulli-doc.pdf
trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/tkz-bernoulli-doc.tex
trunk/Master/texmf-dist/tex/latex/tkz-bernoulli/
trunk/Master/texmf-dist/tex/latex/tkz-bernoulli/tkz-bernoulli.sty
trunk/Master/tlpkg/tlpsrc/tkz-bernoulli.tlpsrc
Added: trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/README.md
===================================================================
--- trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/README.md (rev 0)
+++ trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/README.md 2023-09-09 20:08:38 UTC (rev 68219)
@@ -0,0 +1,7 @@
+tkz-bernoulli is a package to present Bernoulli trees with tikz.
+-----------------------------------------------------------------------------
+tkz-bernoulli est un package pour représenter un arbre de Bernoulli avec tikz.
+-----------------------------------------------------------------------------
+Author : Cédric Pierquet
+email : cpierquet at outlook.fr
+Licence : Released under the LaTeX Project Public License v1.3c or later, see http://www.latex-project.org/lppl.txt
\ No newline at end of file
Property changes on: trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/README.md
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/tkz-bernoulli-doc.pdf
===================================================================
(Binary files differ)
Index: trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/tkz-bernoulli-doc.pdf
===================================================================
--- trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/tkz-bernoulli-doc.pdf 2023-09-09 20:07:00 UTC (rev 68218)
+++ trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/tkz-bernoulli-doc.pdf 2023-09-09 20:08:38 UTC (rev 68219)
Property changes on: trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/tkz-bernoulli-doc.pdf
___________________________________________________________________
Added: svn:mime-type
## -0,0 +1 ##
+application/pdf
\ No newline at end of property
Added: trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/tkz-bernoulli-doc.tex
===================================================================
--- trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/tkz-bernoulli-doc.tex (rev 0)
+++ trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/tkz-bernoulli-doc.tex 2023-09-09 20:08:38 UTC (rev 68219)
@@ -0,0 +1,384 @@
+% !TeX TXS-program:compile = txs:///lualatex
+
+\documentclass[french,11pt,a4paper]{article}
+%\usepackage[utf8]{inputenc}
+%\usepackage[T1]{fontenc}
+\usepackage{amsmath,amssymb}
+\usepackage{fontspec}
+\setmonofont[Scale=MatchLowercase]{Inconsolatazi4}
+\usepackage{tkz-bernoulli}
+\usepackage{nicefrac}
+\usepackage{enumitem}
+\usepackage{codehigh}
+\usepackage{multicol}
+\usepackage{tabularray}
+\usepackage{lipsum}
+\usepackage{fancyvrb}
+\usepackage{fancyhdr}
+\usepackage{fontawesome5}
+\fancyhf{}
+\renewcommand{\headrulewidth}{0pt}
+%\rhead{\sffamily\small\affloetalab[Legende]}
+\lfoot{\sffamily\small [tkz-bernoulli]}
+\cfoot{\sffamily\small - \thepage{} -}
+\rfoot{\hyperlink{matoc}{\small\faArrowAltCircleUp[regular]}}
+\usepackage{hologo}
+\providecommand\tikzlogo{Ti\textit{k}Z}
+\providecommand\TeXLive{\TeX{}Live\xspace}
+\providecommand\PSTricks{\textsf{PSTricks}\xspace}
+\let\pstricks\PSTricks
+\let\TikZ\tikzlogo
+
+\usepackage{hyperref}
+\urlstyle{same}
+\hypersetup{pdfborder=0 0 0}
+\usepackage[margin=1.5cm]{geometry}
+\setlength{\parindent}{0pt}
+\def\TPversion{0.1.0}
+\def\TPdate{9 septembre 2023}
+\usepackage{tcolorbox}
+\tcbuselibrary{skins,hooks}
+\usepackage{soul}
+\sethlcolor{lightgray!25}
+\NewDocumentCommand\MontreCode{ m }{%
+ \hl{\vphantom{\texttt{pf}}\texttt{#1}}%
+}
+\usepackage{siunitx}
+\sisetup{locale=FR}
+\usepackage{babel}
+
+\begin{document}
+
+\pagestyle{fancy}
+
+\thispagestyle{empty}
+
+\begin{center}
+ \begin{minipage}{0.88\linewidth}
+ \begin{tcolorbox}[colframe=yellow,colback=yellow!15]
+ \begin{center}
+ \begin{tabular}{c}
+ {\Huge \texttt{tkz-bernoulli}}\\
+ \\
+ {\LARGE Présenter, grâce à \MontreCode{tikz},} \\
+ {\LARGE des arbres de Bernoulli.} \\
+ \\
+ {\LARGE $\rhd$ Commandes [fr] ou [en] $\lhd$} \\
+ \\
+ {\small \texttt{Version \TPversion{} -- \TPdate}}
+ \end{tabular}
+ \end{center}
+ \end{tcolorbox}
+\end{minipage}
+\end{center}
+
+\begin{center}
+ \begin{tabular}{c}
+ \texttt{Cédric Pierquet}\\
+ {\ttfamily c pierquet -- at -- outlook . fr}\\
+ \texttt{\url{https://github.com/cpierquet/tkz-bernoulli}} \\
+ \end{tabular}
+\end{center}
+
+\hrule
+
+\vfill
+
+Présenter, avec personnalisations possibles, un arbre de Bernoulli.
+
+\vfill
+
+\begin{tcolorbox}[colframe=lightgray,colback=white]
+\MontreCode{\textbackslash tkzSchemBernoulli*}
+
+\hfill\tkzSchemBernoulli*\hfill~
+\end{tcolorbox}
+
+\vspace*{5mm}
+
+\begin{tcolorbox}[colframe=lightgray,colback=white]
+\MontreCode{\textbackslash tkzSchemBernoulli*}
+
+\phantom{\texttt{~~~~}}\MontreCode{[N=2,EspNiv=3,EspFeuil=1.25,NoticeProbas=\{\textbackslash num{0.75}/\textbackslash num\{0.25\}\},Evts=\{\$E\$/\$\textbackslash overline\{E\}\$\}]}
+
+\tikzstyle{BernProbaS} = [text=violet,fill=white,sloped,midway,font=\scriptsize]
+\tikzstyle{BernProbaE} = [text=red,fill=white,sloped,midway,font=\scriptsize]
+\tikzstyle{BernBranche} = [semithick,blue,->]
+\hfill\tkzSchemBernoulli*[N=2,EspNiv=3,EspFeuil=1.25,Notice,Racine=false,Probas={\num{0.75}/\num{0.25}},Evts={$E$/$\overline{E}$}]\hfill~
+\tkzSchemBernStyleDefaut
+\end{tcolorbox}
+
+\vfill~
+
+\pagebreak
+
+\phantomsection
+
+\hypertarget{matoc}{}
+
+\tableofcontents
+
+\vspace*{5mm}
+
+\hrule
+
+\vspace*{5mm}
+
+\section{Le package tkz-bernoulli}
+
+\subsection{Introduction}
+
+L'idée du package \MontreCode{tkz-bernoulli} est de proposer des commandes pour représenter un schéma de Bernoulli, dans le cadre d'une loi binomiale par exemple, avec la possibilité de :
+
+\begin{itemize}
+ \item personnaliser les dimensions et styles ;
+ \item rajouter des éléments a posteriori, grâce aux nœuds créés.
+\end{itemize}
+
+\subsection{Chargement}
+
+Le package se charge dans le préambule, via \MontreCode{\textbackslash usepackage\{tkz-bernoulli\}}.
+
+Les seuls packages chargés sont :
+
+\begin{itemize}
+ \item \MontreCode{xstring}, \MontreCode{pgffor} et \MontreCode{simplekv} ;
+ \item \MontreCode{xintexpr} et \MontreCode{xintbinhex} ;
+ \item \MontreCode{tikz} avec la librairie \MontreCode{calc}.
+\end{itemize}
+
+\begin{codehigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+\usepackage{tkz-bernoulli}
+\end{codehigh}
+
+{\small\faAngleDoubleRight}~\MontreCode{tkz-bernoulli} est compatible avec les compilations usuelles en \textsf{latex}, \textsf{pdflatex}, \textsf{lualatex} ou \textsf{xelatex}.
+
+\subsection{Commandes disponibles}
+
+Les commandes proposées par le package \MontreCode{tkz-bernoulli} sont :
+
+\begin{codehigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+%commande à insérer dans un environnement tikzpicture, pour rajouts éventuels
+\begin{tikzpicture}
+ \tkzSchemBernoulli
+\end{tikzpicture}
+\end{codehigh}
+
+\begin{codehigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+%commande autonome
+\tkzSchemBernoulli*
+\end{codehigh}
+
+\subsection{Styles par défaut}
+
+Le package propose des styles prédéfinis, pour :
+
+\begin{itemize}
+ \item la racine et les nœuds ;
+ \item les branches ;
+ \item les probabilités.
+\end{itemize}
+
+Pour modifier, en \textit{profondeur}, le style de l'arbre, il suffira de redéfinir les styles suivants (une commande est disponible pour remettre tous les styles par défaut) :
+
+\begin{codehigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+%style par défaut des branches
+\tikzstyle{BernBranche} = [semithick]
+
+%style par défaut du label de la racine, si affichée
+\tikzstyle{BernRacine} = [inner sep=2pt]
+
+%styles par défaut des noeuds relatifs à Succès/Échec
+\tikzstyle{BernNoeudS} = [inner sep=2pt]
+\tikzstyle{BernNoeudE} = [inner sep=2pt]
+
+%styles par défaut des probas relatives à Succès/Échec
+\tikzstyle{BernProbaS} = [fill=white,midway,font=\footnotesize,inner sep=1.5pt]
+\tikzstyle{BernProbaE} = [fill=white,midway,font=\footnotesize,inner sep=1.5pt]
+
+%style par défaut des valeurs prises par la v.a.
+\tikzstyle{BernNotice} = [inner sep=2pt,text=teal,right=1em]
+\end{codehigh}
+
+\begin{codehigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+%commande de remise des styles par défaut
+\tkzSchemBernStyleDefaut
+\end{codehigh}
+
+\section{Les commandes}
+
+\subsection{Commande à insérer dans un environnement tikzpicture}
+
+La commande dédiée pour insertion dans un environnement \textsf{tikzpicture} est \MontreCode{\textbackslash tkzSchemBernoulli} :
+
+\begin{codehigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+%commande à insérer dans un environnement tikzpicture, pour rajouts éventuels
+\begin{tikzpicture}
+ \tkzSchemBernoulli[clés]
+\end{tikzpicture}
+\end{codehigh}
+
+Concernant cette commande :
+
+\begin{itemize}
+ \item les clés disponibles sont :
+ \begin{itemize}
+ \item \MontreCode{EspNiv} := espace horizontal entre les niveaux (\MontreCode{2.25} par défaut) ;
+ \item \MontreCode{EspFeuil} := espace vertical entre les éléments du dernier niveau (\MontreCode{1} par défaut) ;
+ \item \MontreCode{Evts} := nom des évènements Succès/Échec (\MontreCode{\$S\$/\$E\$} par défaut) ;
+ \item \MontreCode{Probas} := probabilités (\MontreCode{\$p\$/\$1-p\$} par défaut) ;
+ \item \MontreCode{AffProbas} := booléen pour afficher les probabilités (\MontreCode{true} par défaut) ;
+ \item \MontreCode{Racine} := nom qui apparaît pour la racine(\MontreCode{\$\textbackslash Omega\$} par défaut, ou \MontreCode{false} pour désactiver) ;
+ \item \MontreCode{Aide} := booléen pour afficher les noms des nœuds créés (\MontreCode{false} par défaut) ;
+ \item \MontreCode{Notice} := booléen pour afficher les valeurs prises par la v.a. (\MontreCode{false} par défaut) ;
+ \item \MontreCode{Var} := nom de la v.a. pour la notice (\MontreCode{X} par défaut) ;
+ \item \MontreCode{N} := paramètre $n$ du schéma de Bernoulli (\MontreCode{3} par défaut).
+ \end{itemize}
+\end{itemize}
+
+\begin{demohigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+\begin{tikzpicture}
+ \tkzSchemBernoulli
+\end{tikzpicture}
+\end{demohigh}
+
+\begin{demohigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+%les nœuds sont nommés sous la forme (B<niveau>-<numéro>)
+\begin{tikzpicture}
+ \tkzSchemBernoulli[Aide,Notice,AffProbas=false,EspNiv=3.25,EspFeuil=0.75,N=4]
+\end{tikzpicture}
+\end{demohigh}
+
+\begin{demohigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+%\usepackage{nicefrac}
+\begin{tikzpicture}
+ \tkzSchemBernoulli[%
+ Evts={$A$/$\overline{A}$},%
+ EspFeuil=0.75,%
+ Probas={$\nicefrac{1}{6}$/$\nicefrac{5}{6}$}]
+\end{tikzpicture}
+\end{demohigh}
+
+\subsection{Commande autonome}
+
+La commande dédiée pour insertion autonome est \MontreCode{\textbackslash tkzSchemBernoulli*} :
+
+\begin{codehigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+%commande autonome
+\tkzSchemBernoulli*[clés]<options tikz>
+\end{codehigh}
+
+Concernant cette commande :
+
+\begin{itemize}
+ \item l'environnement \textsf{tikzpicture} est automatiquement créé ;
+ \item les \textsf{clés} sont les mêmes que pour la commande non étoilée ;
+ \item des \MontreCode{<options tikz>}, optionnels, peuvent être passées à l'environnement \textsf{tikzpicture}.
+\end{itemize}
+
+\begin{demohigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+\tkzSchemBernoulli*
+\end{demohigh}
+
+\begin{demohigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+\tkzSchemBernoulli*[Notice,AffProbas=false,EspNiv=3.25,EspFeuil=0.75,N=4,Aide]
+\end{demohigh}
+
+\begin{demohigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+%\usepackage{nicefrac}
+\tkzSchemBernoulli*[%
+ N=6,EspFeuil=0.35,Notice,%
+ Probas={$\nicefrac{1}{6}$/$\nicefrac{5}{6}$}]
+ <scale=0.75,every node/.style={scale=0.5}>
+\end{demohigh}
+
+\pagebreak
+
+\subsection{Mofication avancée des styles}
+
+Les \textsf{clés} relatives aux commandes précédentes permettent de modifier l'aspect \textit{global} de l'arbre, mais les styles particuliers des éléments peuvent également être modifiés, comme indiqué au début de cette documentation.
+
+\begin{demohigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+\tikzstyle{BernBranche} = [thick,red,->]
+\tikzstyle{BernRacine} = []
+\tikzstyle{BernNoeudS} = [draw,rectangle,inner sep=1.5pt]
+\tikzstyle{BernNoeudE} = [draw,rectangle,inner sep=1.5pt]
+\tikzstyle{BernProbaS} = [text=teal,midway,fill=cyan!5,inner sep=1.5pt]
+\tikzstyle{BernProbaE} = [text=orange,midway,fill=purple!5,inner sep=1.5pt]
+\tkzSchemBernoulli*
+\end{demohigh}
+
+\pagebreak
+
+\section{English commands}
+
+\subsection{Introduction}
+
+There's also english versions of the commands and keys :
+
+\begin{codehigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+%command in an environment tikzpicture
+\begin{tikzpicture}
+ \tkzBernoulliTree[keys]
+\end{tikzpicture}
+\end{codehigh}
+
+\begin{codehigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+%stand-alone command
+\tkzBernoulliTree*[keys]<tikz options>
+\end{codehigh}
+
+Default styles are given by :
+
+\begin{codehigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+%style for edges
+\tikzstyle{BernEdge} = [semithick]
+
+%style for root (if displayed)
+\tikzstyle{BernRoot} = [inner sep=2pt]
+
+%styles for nodes Success/Failure
+\tikzstyle{BernNodeS} = [inner sep=2pt]
+\tikzstyle{BernNodeF} = [inner sep=2pt]
+
+%styles for probas Success/Failure
+\tikzstyle{BernProbS} = [fill=white,midway,font=\footnotesize,inner sep=2pt]
+\tikzstyle{BernProbF} = [fill=white,midway,font=\footnotesize,inner sep=2pt]
+
+%style for values taken by X
+\tikzstyle{BernGuide} = [inner sep=2pt,text=teal,right=1em]
+\end{codehigh}
+
+\begin{codehigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+%command to restore default styles
+\tkzBernTreeStyleDefault
+\end{codehigh}
+
+\subsection{Examples}
+
+\begin{demohigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+\begin{tikzpicture}
+ \tkzBernoulliTree
+\end{tikzpicture}
+\end{demohigh}
+
+\begin{demohigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+\tkzBernoulliTree*[Help,ShowProbs=false,LevelSep=3.25,NodeSep=0.75,N=4,Guide,var=Z]
+\end{demohigh}
+
+\begin{demohigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
+%\usepackage{nicefrac}
+\tikzstyle{BernEdge} = [thick,red,->]
+\tikzstyle{BernRoot} = []
+\tikzstyle{BernNodeS} = [draw,rectangle,fill=yellow,inner sep=1.5pt]
+\tikzstyle{BernNodeF} = [draw,rectangle,fill=orange,inner sep=1.5pt]
+\tikzstyle{BernProbS} = [text=teal,midway,fill=cyan!5,inner sep=1.5pt]
+\tikzstyle{BernProbF} = [text=orange,midway,fill=purple!5,inner sep=1.5pt]
+\tikzstyle{BernGuide} = [draw,rectangle,inner sep=2pt,text=green,right=2em]
+\tkzBernoulliTree*[%
+ Events={$A$/$\overline{A}$},%
+ NodeSep=0.75,Guide,%
+ Probs={$\nicefrac{1}{6}$/$\nicefrac{5}{6}$}]
+\end{demohigh}
+
+\end{document}
\ No newline at end of file
Property changes on: trunk/Master/texmf-dist/doc/latex/tkz-bernoulli/tkz-bernoulli-doc.tex
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: trunk/Master/texmf-dist/tex/latex/tkz-bernoulli/tkz-bernoulli.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/tkz-bernoulli/tkz-bernoulli.sty (rev 0)
+++ trunk/Master/texmf-dist/tex/latex/tkz-bernoulli/tkz-bernoulli.sty 2023-09-09 20:08:38 UTC (rev 68219)
@@ -0,0 +1,328 @@
+% Author : C. Pierquet
+% licence : Released under the LaTeX Project Public License v1.3c or later, see http://www.latex-project.org/lppl.txtf
+
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{tkz-bernoulli}[2023/09/09 0.1.0 Draw Bernoulli tree with tikz]
+
+%====HISTORIQUE
+% v 0.1.0 Version initiale [fr] et [en]
+
+%====BASE
+\RequirePackage{tikz,pgffor}
+\RequirePackage{xstring}
+\RequirePackage{simplekv}
+\RequirePackage{xintexpr,xintbinhex}
+\usetikzlibrary{calc}
+
+%====SCHÉMA DE BERNOULLI [FR]
+%styles par défaut
+\tikzstyle{BernBranche} = [semithick]
+\tikzstyle{BernRacine} = [inner sep=2pt]
+\tikzstyle{BernNoeudS} = [inner sep=2pt]
+\tikzstyle{BernNoeudE} = [inner sep=2pt]
+\tikzstyle{BernProbaS} = [fill=white,midway,font=\footnotesize,inner sep=2pt]
+\tikzstyle{BernProbaE} = [fill=white,midway,font=\footnotesize,inner sep=2pt]
+\tikzstyle{BernNotice} = [inner sep=2pt,text=teal,right=1em]
+
+%commande de personnalisations
+% \NewDocumentCommand\tkzSchemBernStyle{ m m }{%1=type,2=tikzstyle
+ % \xdef\BernStyle{\noexpand#2}
+ % \IfStrEq{#2}{defaut}%
+ % {%
+ % \IfStrEq{#1}{branche}{\tikzstyle{BernBranche} = [semithick]}{}%
+ % \IfStrEq{#1}{racine}{\tikzstyle{BernRacine} = [inner sep=2pt]}{}%
+ % \IfStrEq{#1}{noeudS}{\tikzstyle{BernNoeudS} = [inner sep=2pt]}{}%
+ % \IfStrEq{#1}{noeudE}{\tikzstyle{BernNoeudE} = [inner sep=2pt]}{}%
+ % \IfStrEq{#1}{probaS}{\tikzstyle{BernProbaS} = [fill=white,midway,font=\footnotesize]}{}%
+ % \IfStrEq{#1}{probaE}{\tikzstyle{BernProbaE} = [fill=white,midway,font=\footnotesize]}{}%
+ % \IfStrEq{#1}{notice}{\tikzstyle{BernNotice} = [inner sep=2pt,text=teal,right=1em]}{}%
+ % }%
+ % {%
+ % \IfStrEq{#1}{branche}{\tikzstyle{BernBranche} = [\BernStyle]}{}%
+ % \IfStrEq{#1}{racine}{\tikzstyle{BernRacine} = [\BernStyle]}{}%
+ % \IfStrEq{#1}{noeudS}{\tikzstyle{BernNoeudS} = [\BernStyle]}{}%
+ % \IfStrEq{#1}{noeudE}{\tikzstyle{BernNoeudE} = [\BernStyle]}{}%
+ % \IfStrEq{#1}{probaS}{\tikzstyle{BernProbaS} = [\BernStyle]}{}%
+ % \IfStrEq{#1}{probaE}{\tikzstyle{BernProbaE} = [\BernStyle]}{}%
+ % \IfStrEq{#1}{notice}{\tikzstyle{BernNotice} = [\BernStyle]}{}%
+ % }%
+% }
+
+\NewDocumentCommand\tkzSchemBernStyleDefaut{ }{%
+ \tikzstyle{BernBranche} = [semithick]
+ \tikzstyle{BernRacine} = [inner sep=2pt]
+ \tikzstyle{BernNoeudS} = [inner sep=2pt]
+ \tikzstyle{BernNoeudE} = [inner sep=2pt]
+ \tikzstyle{BernProbaS} = [fill=white,midway,font=\footnotesize,inner sep=2pt]
+ \tikzstyle{BernProbaE} = [fill=white,midway,font=\footnotesize,inner sep=2pt]
+ \tikzstyle{BernNotice} = [inner sep=2pt,text=teal,right=1em]
+}
+
+%clés
+\defKV[ArbreBernoulli]{%
+ EspNiv=\def\ArBinIN{#1},%
+ EspFeuil=\def\ArBinIF{#1},%
+ Evts=\def\ArBinEvts{#1},%
+ Probas=\def\ArBinProbas{#1},%
+ Racine=\def\ArBinRacine{#1},%
+ Var=\def\ArBinVar{#1},%
+ N=\def\ArBinN{#1}
+}
+
+\setKVdefault[ArbreBernoulli]{%
+ EspNiv=2.25,%
+ EspFeuil=1,%
+ Evts={$S$/$E$},%
+ Probas={$p$/$1-p$},%
+ Grille=false,%
+ AffProbas=true,%
+ Racine=$\Omega$,%
+ Aide=false,%
+ Notice=false,%
+ Var=X,%
+ N=3
+}
+
+\NewDocumentCommand\tkzSchemBernoulli{ s O{} D<>{} }{%
+ \useKVdefault[ArbreBernoulli]%
+ \setKV[ArbreBernoulli]{#2}%
+ \saveexpandmode\expandarg
+ \StrCut{\ArBinEvts}{/}{\ArBinSucces}{\ArBinEchec}%
+ \StrCut{\ArBinProbas}{/}{\ArBinProbSucces}{\ArBinProbEchec}%
+ \restoreexpandmode
+ \IfBooleanT{#1}%
+ {%
+ \begin{tikzpicture}[#3]
+ }%
+ %grille
+ \ifboolKV[ArbreBernoulli]{Grille}%
+ {%
+ \filldraw[red!25] (0,0) circle[radius=2pt] ;
+ \draw[very thin,lightgray] (0,{-0.5*\ArBinIF*2^(\ArBinN)}) grid ({\ArBinN*\ArBinIN},{0.5*\ArBinIF*2^(\ArBinN)}) ;%
+ }%
+ {}%
+ %Racine
+ \IfStrEq{\ArBinRacine}{false}%
+ {%
+ \coordinate (B0-1) at (0,0) ;%
+ }%
+ {%
+ \coordinate (A0-1) at (0,0) ;%
+ \node[BernRacine] (B0-1) at (A0-1) {\ArBinRacine} ;%
+ }%
+ %Aide Racine
+ \ifboolKV[ArbreBernoulli]{Aide}%
+ {\draw[teal] (B0-1) node[below=4pt,font=\tiny\ttfamily] {B0-1} ;}%
+ {}%
+ %générations des nœuds du premier chemin
+ \foreach \i in {1,...,\ArBinN}{%
+ \def\j{\inteval{\i-1}}%
+ \def\ArBinTmpNiv{\fpeval{2**(\ArBinN-\i)}}%
+ \def\ArBinTmpNds{\fpeval{2**(\i)}}%
+ \coordinate (A\i-1) at ($(A\j-1)+({\ArBinIN},{0.5*\ArBinIF*\ArBinTmpNiv})$) ;
+ \foreach \k in {2,...,\ArBinTmpNds}{%
+ \def\l{\inteval{\k-1}}%
+ \coordinate (A\i-\k) at ($(A\i-\l)+(0,{-\ArBinIF*\ArBinTmpNiv})$) ;
+ }%
+ }%
+ %test des nœuds OK ^^
+ \foreach \i in {1,...,\ArBinN}{%
+ \def\ArBinTmpNds{\fpeval{2**(\i)}}%
+ \foreach \j in {1,...,\ArBinTmpNds}{%
+ \xintifboolexpr{\xintiiRem{\j}{2} != 0 }%
+ {\node[BernNoeudS] (B\i-\j) at (A\i-\j) {\ArBinSucces} ;}%succès
+ {\node[BernNoeudE] (B\i-\j) at (A\i-\j) {\ArBinEchec} ;}%échec
+ \ifboolKV[ArbreBernoulli]{Aide}%
+ {\draw[teal] (B\i-\j) node[below=4pt,font=\tiny\ttfamily] {B\i-\j} ;}%
+ {}%
+ }%
+ }%
+ %test des flèches...
+ \foreach \i in {0,...,\inteval{\ArBinN-1}}{%
+ \def\ipu{\inteval{\i+1}}%
+ \def\ArBinTmpNds{\fpeval{2**(\i)}}%
+ \foreach \j in {1,...,\ArBinTmpNds}{%
+ \def\ArBinTmpA{\inteval{2*\j-1}}%
+ \def\ArBinTmpB{\inteval{2*\j}}%
+ \ifboolKV[ArbreBernoulli]{AffProbas}%
+ {%
+ \draw[BernBranche] (B\i-\j) -- (B\ipu-\ArBinTmpA) node[BernProbaS] {\ArBinProbSucces} ;
+ \draw[BernBranche] (B\i-\j) -- (B\ipu-\ArBinTmpB) node[BernProbaE] {\ArBinProbEchec} ;
+ }%
+ {%
+ \draw[BernBranche] (B\i-\j) -- (B\ipu-\ArBinTmpA) ;
+ \draw[BernBranche] (B\i-\j) -- (B\ipu-\ArBinTmpB) ;
+ }%
+ }%
+ }%
+ \ifboolKV[ArbreBernoulli]{Notice}%
+ {%
+ \foreach \i in {1,...,\fpeval{2**\ArBinN}}{%
+ \def\itmp{\fpeval{2**\ArBinN-\i}}%
+ \def\ArBenTmpBin{\xintDecToBin{\itmp}}%
+ \draw (B\ArBinN-\i) node[BernNotice] {$\longrightarrow X=\StrCount{\ArBenTmpBin}{1}$} ;
+ }%
+ }%
+ {}%
+ \IfBooleanT{#1}%
+ {%
+ \end{tikzpicture}%
+ }%
+}
+
+%====SCHÉMA DE BERNOULLI [EN]
+%styles par défaut [en]
+\tikzstyle{BernEdge} = [semithick]
+\tikzstyle{BernRoot} = [inner sep=2pt]
+\tikzstyle{BernNodeS} = [inner sep=2pt]
+\tikzstyle{BernNodeF} = [inner sep=2pt]
+\tikzstyle{BernProbS} = [fill=white,midway,font=\footnotesize,inner sep=2pt]
+\tikzstyle{BernProbF} = [fill=white,midway,font=\footnotesize,inner sep=2pt]
+\tikzstyle{BernGuide} = [inner sep=2pt,text=teal,right=1em]
+
+%commande de personnalisations [en]
+% \NewDocumentCommand\tkzBernTreeStyle{ m m }{%1=type,2=tikzstyle
+ % \IfStrEq{#2}{default}%
+ % \IfStrEq{#2}{defaut}%
+ % {%
+ % \IfStrEq{#1}{edge}{\tikzstyle{BernEdge} = [semithick]}{}%
+ % \IfStrEq{#1}{root}{\tikzstyle{BernRoot} = [inner sep=2pt]}{}%
+ % \IfStrEq{#1}{nodeS}{\tikzstyle{BernNodeS} = [inner sep=2pt]}{}%
+ % \IfStrEq{#1}{nodeF}{\tikzstyle{BernNodeF} = [inner sep=2pt]}{}%
+ % \IfStrEq{#1}{probS}{\tikzstyle{BernProbS} = [fill=white,midway,font=\footnotesize]}{}%
+ % \IfStrEq{#1}{probF}{\tikzstyle{BernProbF} = [fill=white,midway,font=\footnotesize]}{}%
+ % \IfStrEq{#1}{guide}{\tikzstyle{BernGuide} = [inner sep=2pt,text=teal,right=1em]}{}%
+ % }%
+ % {%
+ % \IfStrEq{#1}{edge}{\tikzstyle{BernEdge} = [#2]}{}%
+ % \IfStrEq{#1}{root}{\tikzstyle{BernRoot} = [#2]}{}%
+ % \IfStrEq{#1}{nodeS}{\tikzstyle{BernNodeS} = [#2]}{}%
+ % \IfStrEq{#1}{nodeF}{\tikzstyle{BernNodeF} = [#2]}{}%
+ % \IfStrEq{#1}{probS}{\tikzstyle{BernProbS} = [#2]}{}%
+ % \IfStrEq{#1}{probF}{\tikzstyle{BernProbF} = [#2]}{}%
+ % \IfStrEq{#1}{guide}{\tikzstyle{BernGuide} = [#2]}{}%
+ % }%
+% }
+
+\NewDocumentCommand\tkzBernTreeStyleDefault{ }{%1=type,2=tikzstyle
+ \tikzstyle{BernEdge} = [semithick]
+ \tikzstyle{BernRoot} = [inner sep=2pt]
+ \tikzstyle{BernNodeS} = [inner sep=2pt]
+ \tikzstyle{BernNodeF} = [inner sep=2pt]
+ \tikzstyle{BernProbS} = [fill=white,midway,font=\footnotesize,inner sep=2pt]
+ \tikzstyle{BernProbF} = [fill=white,midway,font=\footnotesize,inner sep=2pt]
+ \tikzstyle{BernGuide} = [inner sep=2pt,text=teal,right=1em]
+}
+
+\defKV[BernoulliTree]{%
+ LevelSep=\def\ArBinIN{#1},%
+ NodeSep=\def\ArBinIF{#1},%
+ Events=\def\ArBinEvts{#1},%
+ Probs=\def\ArBinProbas{#1},%
+ Root=\def\ArBinRacine{#1},%
+ Var=\def\ArBinVar{#1},%
+ N=\def\ArBinN{#1}
+}
+
+\setKVdefault[BernoulliTree]{%
+ LevelSep=2.25,%
+ NodeSep=1,%
+ Events={$S$/$E$},%
+ Probs={$p$/$1-p$},%
+ Grid=false,%
+ ShowProbs=true,%
+ Root=$\Omega$,%
+ Help=false,%
+ Guide=false,%
+ Var=X,%
+ N=3
+}
+
+\NewDocumentCommand\tkzBernoulliTree{ s O{} D<>{} }{%
+ \useKVdefault[BernoulliTree]%
+ \setKV[BernoulliTree]{#2}%
+ \saveexpandmode\expandarg
+ \StrCut{\ArBinEvts}{/}{\ArBinSucces}{\ArBinEchec}%
+ \StrCut{\ArBinProbas}{/}{\ArBinProbSucces}{\ArBinProbEchec}%
+ \restoreexpandmode
+ \IfBooleanT{#1}%
+ {%
+ \begin{tikzpicture}[#3]
+ }%
+ %grille
+ \ifboolKV[BernoulliTree]{Grid}%
+ {%
+ \filldraw[red!25] (0,0) circle[radius=2pt] ;
+ \draw[very thin,lightgray] (0,{-0.5*\ArBinIF*2^(\ArBinN)}) grid ({\ArBinN*\ArBinIN},{0.5*\ArBinIF*2^(\ArBinN)}) ;%
+ }%
+ {}%
+ %Racine
+ \IfStrEq{\ArBinRacine}{false}%
+ {%
+ \coordinate (B0-1) at (0,0) ;%
+ }%
+ {%
+ \coordinate (A0-1) at (0,0) ;%
+ \node[BernRoot] (B0-1) at (A0-1) {\ArBinRacine} ;%
+ }%
+ %Aide Racine
+ \ifboolKV[BernoulliTree]{Help}%
+ {\draw[teal] (B0-1) node[below=4pt,font=\tiny\ttfamily] {A00} ;}%
+ {}%
+ %générations des nœuds du premier chemin
+ \foreach \i in {1,...,\ArBinN}{%
+ \def\j{\inteval{\i-1}}%
+ \def\ArBinTmpNiv{\fpeval{2**(\ArBinN-\i)}}%
+ \def\ArBinTmpNds{\fpeval{2**(\i)}}%
+ \coordinate (A\i-1) at ($(A\j-1)+({\ArBinIN},{0.5*\ArBinIF*\ArBinTmpNiv})$) ;
+ \foreach \k in {2,...,\ArBinTmpNds}{%
+ \def\l{\inteval{\k-1}}%
+ \coordinate (A\i-\k) at ($(A\i-\l)+(0,{-\ArBinIF*\ArBinTmpNiv})$) ;
+ }%
+ }%
+ %test des nœuds OK ^^
+ \foreach \i in {1,...,\ArBinN}{%
+ \def\ArBinTmpNds{\fpeval{2**(\i)}}%
+ \foreach \j in {1,...,\ArBinTmpNds}{%
+ \xintifboolexpr{\xintiiRem{\j}{2} != 0 }%
+ {\node[BernNodeS] (B\i-\j) at (A\i-\j) {\ArBinSucces} ;}%succès
+ {\node[BernNodeF] (B\i-\j) at (A\i-\j) {\ArBinEchec} ;}%échec
+ \ifboolKV[BernoulliTree]{Help}%
+ {\draw[teal] (B\i-\j) node[below=4pt,font=\tiny\ttfamily] {B\i-\j} ;}%
+ {}%
+ }%
+ }%
+ %test des flèches...
+ \foreach \i in {0,...,\inteval{\ArBinN-1}}{%
+ \def\ipu{\inteval{\i+1}}%
+ \def\ArBinTmpNds{\fpeval{2**(\i)}}%
+ \foreach \j in {1,...,\ArBinTmpNds}{%
+ \def\ArBinTmpA{\inteval{2*\j-1}}%
+ \def\ArBinTmpB{\inteval{2*\j}}%
+ \ifboolKV[BernoulliTree]{ShowProbs}%
+ {%
+ \draw[BernEdge] (B\i-\j) -- (B\ipu-\ArBinTmpA) node[BernProbS] {\ArBinProbSucces} ;
+ \draw[BernEdge] (B\i-\j) -- (B\ipu-\ArBinTmpB) node[BernProbF] {\ArBinProbEchec} ;
+ }%
+ {%
+ \draw[BernEdge] (B\i-\j) -- (B\ipu-\ArBinTmpA) ;
+ \draw[BernEdge] (B\i-\j) -- (B\ipu-\ArBinTmpB) ;
+ }%
+ }%
+ }%
+ \ifboolKV[BernoulliTree]{Guide}%
+ {%
+ \foreach \i in {1,...,\fpeval{2**\ArBinN}}{%
+ \def\itmp{\fpeval{2**\ArBinN-\i}}%
+ \def\ArBenTmpBin{\xintDecToBin{\itmp}}%
+ \draw (B\ArBinN-\i) node[BernGuide] {$\longrightarrow X=\StrCount{\ArBenTmpBin}{1}$} ;
+ }%
+ }%
+ {}%
+ \IfBooleanT{#1}%
+ {%
+ \end{tikzpicture}%
+ }%
+}
+
+\endinput
\ No newline at end of file
Property changes on: trunk/Master/texmf-dist/tex/latex/tkz-bernoulli/tkz-bernoulli.sty
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Modified: trunk/Master/tlpkg/bin/tlpkg-ctan-check
===================================================================
--- trunk/Master/tlpkg/bin/tlpkg-ctan-check 2023-09-09 20:07:00 UTC (rev 68218)
+++ trunk/Master/tlpkg/bin/tlpkg-ctan-check 2023-09-09 20:08:38 UTC (rev 68219)
@@ -839,8 +839,8 @@
tikztosvg tikzviolinplots tile-graphic tilings
timbreicmc times timetable timing-diagrams tinos tipa tipa-de tipauni tipfr
tiscreen titlecaps titlefoot titlepages titlepic titleref titlesec titling
- tkz-base tkz-berge tkz-doc tkz-euclide tkz-fct tkz-graph tkz-tab
- tkz-orm tkzexample
+ tkz-base tkz-berge tkz-bernoulli tkz-doc tkz-euclide
+ tkz-fct tkz-graph tkz-orm tkz-tab tkzexample
tlc-article tlc2 tlc3-examples tlcockpit tlmgr-intro-zh-cn tlmgrbasics
to-be-determined tocbibind tocdata tocloft tocvsec2 todo todonotes
tokcycle tokenizer tonevalue toolbox tools
Modified: trunk/Master/tlpkg/libexec/ctan2tds
===================================================================
--- trunk/Master/tlpkg/libexec/ctan2tds 2023-09-09 20:07:00 UTC (rev 68218)
+++ trunk/Master/tlpkg/libexec/ctan2tds 2023-09-09 20:08:38 UTC (rev 68219)
@@ -1841,6 +1841,7 @@
'tikz-ext' => '&POSTtikz_ext',
'tipa-de' => '&POST_rmsymlink',
'tkz-berge' => '&POSTtkz_berge',
+ 'tkz-bernoulli' => '&POST_onelevel',
'tlcockpit' => '&POST_do_man',
'tlc3-examples' => '&POSTtlc3_examples',
'tudscr' => '&POSTtudscr',
Modified: trunk/Master/tlpkg/tlpsrc/collection-pictures.tlpsrc
===================================================================
--- trunk/Master/tlpkg/tlpsrc/collection-pictures.tlpsrc 2023-09-09 20:07:00 UTC (rev 68218)
+++ trunk/Master/tlpkg/tlpsrc/collection-pictures.tlpsrc 2023-09-09 20:08:38 UTC (rev 68219)
@@ -226,6 +226,7 @@
depend tipfr
depend tkz-base
depend tkz-berge
+depend tkz-bernoulli
depend tkz-doc
depend tkz-euclide
depend tkz-fct
Added: trunk/Master/tlpkg/tlpsrc/tkz-bernoulli.tlpsrc
===================================================================
More information about the tex-live-commits
mailing list.