☰

このコード (異なる関数を使用した類似の newcommand 定義) をコピーして貼り付けるのを避けるにはどうすればよいですか :

tag-icon • tag-icon tikz-pgf macros expansion
このコード (異なる関数を使用した類似の newcommand 定義) をコピーして貼り付けるのを避けるにはどうすればよいですか :

皆さんのおかげでコードを改善してきましたが、これは醜いコピー/ペーストのように見えるため、まだ改善の余地があるようです。

\newcommand*{\LegendFlecheInf}[5]{ 
    \coordinate (C2) at (axis cs:#2, { \FInfAUn(#1,#2) }) ;
    \draw node[anchor=#3] (#4) at #5 {$z =#1$};
    \draw[fleche] (C2) -- (#4.west) ;
}
\newcommand*{\LegendFlecheEga}[5]{ 
    \coordinate (C2) at (axis cs:#2, { \FEgaAUn(#2) }) ;
    \draw node[anchor=#3] (#4) at #5 {$z =#1$};
    \draw[fleche] (C2) -- (#4.west) ;
}
\newcommand*{\LegendFlecheSup}[5]{ 
    \coordinate (C2) at (axis cs:#2, { \FSupAUn(#1,#2) }) ;
    \draw node[anchor=#3] (#4) at #5 {$z =#1$};
    \draw[fleche] (C2) -- (#4.west) ;
}

ここで定義されている 3 つのコマンドの唯一の違いは、矢印の端の y 座標を計算するためにどの関数が呼び出されるかという点です。

MWE のためにかなり削除しましたが、それでもまだ大きいです :

\documentclass[border=2pt]{standalone}
\usepackage[utf8]{inputenc}

\usepackage{graphics}
\usepackage{tikz,pgfplots}
\usetikzlibrary{math} % Pour evaluate
\usetikzlibrary{calc} % Pour postionnement relatif

\def\FInfAUn(#1,#2){( 1 - ( (exp(-W*#1*#2)/sqrt(1-#1*#1)) *cos((W*#2*sqrt(1-#1*#1) 
                    - (atan(#1/sqrt(1-#1*#1))*pi/180) ) *180/pi) )  ) *\Kg }

\def\FTUn(#1){( 1/( W*(#1-sqrt((#1*#1) -1))) )}
\def\FTDeux(#1){( 1/(W *(#1+sqrt((#1*#1) -1))) )}
\def\FInterSupAUn(#1,#2,#3){(  \Kg * (1 - ( 1/( #1 - #2 ) )*( #1 *exp(-#3/ #1 ) - #2 *exp(-#3/ #2 ) ))   )}
\def\FSupAUn(#1,#2){ \FInterSupAUn({\FTUn(#1)},{\FTDeux(#1)},#2)   }
\def\FEgaAUn(#1){ \Kg * (1 - ( 1+ #1/(1/W) )*exp(-#1/(1/W)) )  }

    \newcommand*{\LegendFlecheInf}[5]{ 
        \coordinate (C2) at (axis cs:#2, { \FInfAUn(#1,#2) }) ;
        \draw node[anchor=#3] (#4) at #5 {$z =#1$};
        \draw[fleche] (C2) -- (#4.west) ;
    }
    \newcommand*{\LegendFlecheEga}[5]{ 
        \coordinate (C2) at (axis cs:#2, { \FEgaAUn(#2) }) ;
        \draw node[anchor=#3] (#4) at #5 {$z =#1$};
        \draw[fleche] (C2) -- (#4.west) ;
    }
    \newcommand*{\LegendFlecheSup}[5]{ 
        \coordinate (C2) at (axis cs:#2, { \FSupAUn(#1,#2) }) ;
        \draw node[anchor=#3] (#4) at #5 {$z =#1$};
        \draw[fleche] (C2) -- (#4.west) ;
    }

\tikzset{ fleche/.style={<-,>=latex,line width=0.2mm,shorten <=-0.02cm} }

\begin{document}
\begin{tikzpicture}[
  declare function={
    W=pi*2;
  }]
\def\Kg{2}
\def\Ezero{1} 
\def\Ttrace{3}

\begin{axis}[ymax=1.55*\Kg]
    \addplot[blue,loosely dashed,thick=3pt,ultra thick,domain=0:3] {  \FEgaAUn(x)  };  \label{d}

    %\LegendFleche{z}{t}{Anchor of new node}{New node name}{previous node anchor coinsiding with this anchor}
    \LegendFlecheInf{0.2}{0.6}{west}{C3}{($(C2)+(axis cs:0.5,0.05)$)}
    \LegendFlecheSup{4}{0.6}{west}{C3}{($(C2)+(axis cs:1,-0.5)$)}
    \LegendFlecheSup{2}{0.6}{south}{C4}{(C3.north)}
    \LegendFlecheEga{1}{0.6}{south}{C5}{(C4.north)}

\end{axis}
\end{tikzpicture}
\end{document}

答え1

置き換えることができます

\newcommand*{\LegendFlecheInf}[5]{ 
    \coordinate (C2) at (axis cs:#2, { \FInfAUn(#1,#2) }) ;
    \draw node[anchor=#3] (#4) at #5 {$z =#1$};
    \draw[fleche] (C2) -- (#4.west) ;
}
\newcommand*{\LegendFlecheEga}[5]{ 
    \coordinate (C2) at (axis cs:#2, { \FEgaAUn(#2) }) ;
    \draw node[anchor=#3] (#4) at #5 {$z =#1$};
    \draw[fleche] (C2) -- (#4.west) ;
}
\newcommand*{\LegendFlecheSup}[5]{ 
    \coordinate (C2) at (axis cs:#2, { \FSupAUn(#1,#2) }) ;
    \draw node[anchor=#3] (#4) at #5 {$z =#1$};
    \draw[fleche] (C2) -- (#4.west) ;
}

による

\newcommand*{\Legendx}[6]{ 
    \coordinate (C2) at (axis cs:#2, { #6(#1,#2) }) ;
    \draw node[anchor=#3] (#4) at #5 {$z =#1$};
    \draw[fleche] (C2) -- (#4.west) ;
}

そして例えば

\LegendFlecheEga{1}{0.6}{south}{C5}{(C4.north)}

による

\Legendx{1}{0.6}{south}{C5}{(C4.north)}\FEgaAUn

答え2

このifthenパッケージを使用すると、3 つのコマンドを新しいコマンドに置き換えることができます。

\newcommand{\LegendComplex}[6]{  
     \ifthenelse{\equal{#6}{inf}}{\coordinate (C2) at (axis cs:#2, {\FInfAUn(#1,#2)});}{}
     \ifthenelse{\equal{#6}{sup}}{\coordinate (C2) at (axis cs:#2, {\FSupAUn(#1,#2)});}{}
     \ifthenelse{\equal{#6}{ega}}{\coordinate (C2) at (axis cs:#2, {\FEgaAUn(#2)});}{}      
    \draw node[anchor=#3] (#4) at #5 {$z =#1$};
    \draw[fleche] (C2) -- (#4.west) ;
}

呼び出す関数を指定するための新しいパラメータ (sup、inf、または ega) を指定する必要があります。

関連情報