Quiero hacer que la trama del carcaj sea un poco más bonita, así que he trabajado en una representación más bonita de la flecha con un aspecto un poco 3D. Se toma el sombreado de la flecha.de otra preguntaen este sitio. Yesta preguntaes el origen de la \arrowthreeDmacro.
En este momento tengo problemas con la posición de las flechas. Todo lo demás funciona bien: las flechas están bien escaladas y también la coloración mediante mapas de colores funciona bien. Además, la colocación de las flechas se realiza dentro del eje cs, tal como yo lo veo. (Se colocan en 1,\pgfplotspointmetatransformed/200donde \pgfplotspointmetatransformedestá 0..1000. Por lo tanto, se colocan en consecuencia entre 0 y 5 para el valor de y.
Sin embargo, en la posición del comentario en el código, no tengo ningún método para acceder a las coordenadas (x,y) donde se colocaron originalmente las flechas. En el códem pgfplots encontré algo sobre \pgfplots@current@point@[xyz]. Pero no pude acceder a los valores almacenados allí... Del mismo modo, no sé cómo acceder a u y v, las dimensiones de la flecha del carcaj, para calcular el ángulo mediante atan() o un procedimiento similar.
Entonces mi pregunta podría ser: ¿Cómo puedo acceder?
\pgfplots@current@point@x\pgfplots@current@point@y\pgfplots@quiver@u\pgfplots@quiver@v
Si intento usarlos simplemente, no se pueden evaluar (recibo algunos errores después \pgfplots. Por ejemplo, usar \pgfplots@current@point@xpara la coordenada x da como resultado
! Undefined control sequence.
<argument> \pgfplots
@current@point@x,\pgfplotspointmetatransformed /200
l.95 \end{axis}
?
\documentclass[]{standalone}
\usepackage{tikz,pgfplots,pgfplotstable,filecontents}
\usepgfplotslibrary{colormaps}
\usetikzlibrary{calc}
\pgfplotsset{compat=1.13}
\newcommand*{\arrowheadthreeD}[4]{%
\colorlet{beamcolor}{#1!75!black}
\colorlet{innercolor}{#1!50}
\foreach \i in {1, 0.975, ..., 0} {
\pgfmathsetmacro{\shade}{\i*\i*100}
\pgfmathsetmacro{\startangle}{90-\i*30}
\pgfmathsetmacro{\endangle}{90+\i*30}
\fill[beamcolor!\shade!innercolor,shift={#2},rotate=#3,line width=0,line cap=butt,]%,
(0,0) -- (\startangle:0.2599) arc (\startangle:\endangle:0.2599)--cycle;
}
\fill[beamcolor,shift={#2},rotate=#3,line width=0,line cap=butt] (60:0.26) arc (60:120:0.26) -- ($(120:0.26)!0.06*#4!(0,0.0)$) arc (120:60:{0.26-0.015*#4}) -- cycle;
}
\newcommand*{\arrowthreeD}[4]{
\begin{scope}[shift={([rotate = -#4]#2)}]
\begin{scope}[,,transform canvas={rotate=#4},scale=#3,]
\fill [left color=#1!75!black,right color=#1!75!black,middle color=#1!50,join=round,line cap=round,draw=none] (0.05,0) -- (0.05,-0.175) arc (360:180:0.05 and 0.05) -- (-0.05,0)--cycle;
\arrowheadthreeD{#1}{(0,0.25)}{180}{#3};
\end{scope}
\end{scope}
}
\begin{filecontents}{quiver.txt}
x y u v
1 0.5 1.4 1.4
2 0.1 0 1.5
0.1 2 1 0
0.2 0.75 0.5 0
1 1 0.1 0.1
\end{filecontents}
\begin{document}
\thispagestyle{empty}
\begin{tikzpicture}
\begin{axis}[
width= 5cm,
ymin=0,
ymax=6,
xmin=0,
xmax=3,
axis equal image,
clip=false,
grid=both,
colormap/hot2,
]
\addplot[
point meta={sqrt{\thisrow{u}*\thisrow{u}+\thisrow{v}*\thisrow{v}}},
point meta min=0,
quiver={u=\thisrow{u},
v=\thisrow{v},
every arrow/.append style={
line width=1pt,
draw=none,
},
after arrow/.code={
\arrowthreeD{mapped color}{1,\pgfplotspointmetatransformed/200}{sqrt{\pgfplotspointmetatransformed}/25}{90}
%%%%%
%%%%%
% Explanation: arguments are
% color
% coordinates (should be (x,y))
% scaling value
% angle (should be computed from atan(u,v) or similar)
%%%%%
%%%%%
},
},
] table {quiver.txt};
\addplot[
point meta={sqrt{\thisrow{u}*\thisrow{u}+\thisrow{v}*\thisrow{v}}},
quiver={u=\thisrow{u},
v=\thisrow{v},
every arrow/.append style={
line width=2pt*\pgfplotspointmetatransformed/1500,
->,
},
},
] table {quiver.txt};
\end{axis}
\end{tikzpicture}
\end{document}
Y, por supuesto, una imagen de los resultados actuales: (la posición de las nuevas flechas es bastante arbitraria)
Respuesta1
Con la ayuda de otras preguntas, aquí y aquí, pude lograr mi objetivo. En mi opinión, ¡una trama así es realmente mucho más hermosa!
Primero un ejemplo de lapgfplots manual
Mi versión "mejorada"
Y el código para reproducirlo.
\documentclass[border=9,tikz]{standalone}
\usepackage{pgfplots,filecontents}\pgfplotsset{compat=newest}
\usetikzlibrary{arrows.meta,calc}
\newcommand*{\arrowheadthreeD}[4]{%
\colorlet{beamcolor}{#1!75!black}
\colorlet{innercolor}{#1!50}
\foreach \i in {1, 0.9, ..., 0} {
\pgfmathsetmacro{\shade}{\i*\i*100}
\pgfmathsetmacro{\startangle}{90-\i*30}
\pgfmathsetmacro{\endangle}{90+\i*30}
\fill[beamcolor!\shade!innercolor,shift={#2},rotate=#3,line width=0,line cap=butt,]%,
(0,0) -- (\startangle:0.259) arc (\startangle:\endangle:0.259)--cycle;
}
% \pgfmathparse{#4}
\fill[beamcolor,shift={#2},rotate=#3,line width=0,line cap=butt] (60:0.26) arc (60:120:0.26) -- ($(120:0.26)!0.06*1!(0,0.0)$) arc (120:60:{0.26-0.015*1}) -- cycle; % statt *1 *#4???
%\draw[blue,thick,shift={#2},rotate=#3] (0,0) -- (0,0.25);
}
\newcommand*{\arrowthreeD}[4]{
%\begin{scope}[shift={([rotate = -#4]#2)}]
%\begin{scope}[,,transform canvas={rotate=#4},scale=#3,]
\begin{scope}[scale=#3,]
\fill [left color=#1!75!black,right color=#1!75!black,middle color=#1!50,join=round,line cap=round,line width=0,draw=none,shading angle=#4+90,,shift={(0,0.25)},rotate=180] (0,0.25) -- (0.05,0.25) -- (0.05,0.175+0.25) arc (0:180:0.05 and 0.05) -- (-0.05,0.25)--cycle;
% \fill [left color=#1!75!black,right color=#1!75!black,middle color=#1!50,draw=none,shading angle=#4-90] (0,0) -- (0.05,0) -- (0.05,-0.175) -- (-0.05,-0.175) -- (-0.05,0)--cycle;
\arrowheadthreeD{#1}{(0,0.25)}{180}{#3};
\end{scope}
%\end{scope}
}
\begin{document}
\makeatletter
\def\pgfplotsplothandlerquiver@vis@path#1{%
% remember (x,y) in a robust way
#1%
\pgfmathsetmacro\pgfplots@quiver@x{\pgf@x}\global\let\pgfplots@quiver@x\pgfplots@quiver@x%
\pgfmathsetmacro\pgfplots@quiver@y{\pgf@y}\global\let\pgfplots@quiver@y\pgfplots@quiver@y%
% calculate (u,v) in relative coordinate
\pgfplotsaxisvisphasetransformcoordinate\pgfplots@quiver@u\pgfplots@quiver@v\pgfplots@quiver@w%
\pgfplotsqpointxy{\pgfplots@quiver@u}{\pgfplots@quiver@v}%
\pgfmathsetmacro\pgfplots@quiver@u{\pgf@x-\pgfplots@quiver@x}%
\pgfmathsetmacro\pgfplots@quiver@v{\pgf@y-\pgfplots@quiver@y}%
\pgfmathparse{atan2(\pgfplots@quiver@v,\pgfplots@quiver@u)-90}
\pgfmathsetmacro\pgfplots@quiver@a{\pgfmathresult}\global\let\pgfplots@quiver@a\pgfplots@quiver@a%
% move to (x,y) and start drawing
{%
\pgftransformshift{\pgfpoint{\pgfplots@quiver@x}{\pgfplots@quiver@y}}%
\pgfpathmoveto{\pgfpointorigin}%
\pgfpathlineto{\pgfpoint\pgfplots@quiver@u\pgfplots@quiver@v}%
}%
}%
\begin{tikzpicture}
\begin{axis}[axis equal image,enlargelimits=false,view={0}{90},domain=-2:2,,xmin=-2.1,xmax=2.1,ymin=-2.1,ymax=2.1]
\addplot3[contour gnuplot={number=9,
labels=false},thick]
{exp(0-x^2-y^2)*x};
\addplot3[
colormap/hot2,
% point meta=x,
% quiver={
% u=x,v=y,
point meta={sqrt{exp(0-x^2-y^2)*(1-2*x^2)*exp(0-x^2-y^2)*(1-2*x^2)+exp(0-x^2-y^2)*(-2*x*y)*exp(0-x^2-y^2)*(-2*x*y)}},
quiver={u={exp(0-x^2-y^2)*(1-2*x^2)},
v={exp(0-x^2-y^2)*(-2*x*y)},
every arrow/.append style={%
draw=none,%-{Latex[scale length={max(0.1,\pgfplotspointmetatransformed/1000)}]},mapped color
},
after arrow/.code={
\relax{% always protect the shift
\pgftransformshift{\pgfpoint{\pgfplots@quiver@x}{\pgfplots@quiver@y}}%
%\node[below right]{\tiny\color{mapped color!50!black}\pgfplotspointmetatransformed};
\pgftransformrotate{\pgfplots@quiver@a}%
\arrowthreeD{mapped color}{0,0}{sqrt{\pgfplotspointmetatransformed}/62}{\pgfplots@quiver@a}
}
}
},
samples=15,
] {exp(0-x^2-y^2)*x};
\end{axis}
\end{tikzpicture}
\end{document}