I have this LaTeX:


```
\documentclass{beamer}
\usepackage{tikz}
\usetikzlibrary{arrows.meta}
\usetikzlibrary{overlay-beamer-styles}

\makeatletter
\newcommand*{\slideinframe}{\number\beamer@slideinframe}
\makeatother

\def\mylistE{{"$\infty/$null", 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  0, 0, 0, 0, 0}}
\def\mylistD{{"$\infty/$null", "$\infty/$null", "3/E", "3/E", "3/E", "3/E", "3/E", "3/E", "3/E", "3/E","3/E", "3/E","3/E", "3/E","3/E", "3/E", "3/E"}}
\def\mylistB{{"$\infty/$null", "$\infty/$null", "$\infty/$null", "6/E", "6/E", "6/E", "6/E", "5/F", "5/F", "5/F","2/D", "2/D","2/D", "2/D","2/D","2/D"}}
\def\mylistF{{"$\infty/$null", "$\infty/$null", "$\infty/$null", "$\infty/$null", "2/E", "2/E", "2/E", "2/E", "2/E", "2/E","2/E","2/E", "2/E","2/E", "2/E","2/E","2/E"}}
\def\mylistC{{"$\infty/$null", "$\infty/$null", "$\infty/$null", "$\infty/$null", "$\infty/$null", "4/E",  "4/E","4/E", "4/E", "4/E", "4/E", "4/E","4/E", "3/B","3/B", "3/B", "3/B"}}
\def\mylistA{{"$\infty/$null", "$\infty/$null", "$\infty/$null", "$\infty/$null", "$\infty/$null", "$\infty/$null",  "$\infty/$null", "$\infty/$null", "$\infty/$null", "3/D", "3/D", "3/D", "1/B", "1/B", "1/B", "1/B"}}



\begin{document}

\begin{frame}
\frametitle{Prim's Algorithm Demonstration}
\begin{tikzpicture}
\begin{scope}[every node/.style={fill=black, text=white, circle,thick,draw, minimum size=1.2cm}]
    \node[label={[xshift=0em, yshift=-1em, text=black]  \pgfmathparse{\mylistA[\slideinframe-1]}\pgfmathresult},alt=<15->{red}{black},text=white]  (A) at (0,5) {A};
    \node[label={[xshift=0em, yshift=-1em, text=black] \pgfmathparse{\mylistB[\slideinframe-1]}\pgfmathresult},alt=<12->{red}{black},text=white]  (B) at (5,5) {B};
    \node[label={[xshift=0em, yshift=-1em, text=black] \pgfmathparse{\mylistC[\slideinframe-1]}\pgfmathresult},alt=<16->{red}{black},text=white]  (C) at (10,5) {C};
    \node[label={[xshift=0em, yshift=-6em, text=black] \pgfmathparse{\mylistD[\slideinframe-1]}\pgfmathresult},alt=<9->{red}{black},text=white]  (D) at (0,0) {D};
    \node[label={[xshift=0em, yshift=-6em, text=black] \pgfmathparse{\mylistE[\slideinframe-1]}\pgfmathresult},alt=<2->{red}{black},text=white]  (E) at (5,0) {E};
    \node[label={[xshift=0em, yshift=-6em, text=black]  \pgfmathparse{\mylistF[\slideinframe-1]}\pgfmathresult},alt=<7->{red}{black},text=white]  (F) at (10,0) {F} ;
\end{scope}

\begin{scope}[>={Stealth[black]},
              every node/.style={fill=white,circle}]
    \path [-, alt=<15->{line width=1.2mm}{}] (A) edge node {$1$} (B);
    \path [-, alt=<12->{line width=1.2mm}{}] (D) edge node {$2$} (B);
    \path [-] (A) edge node {$3$} (D);
    \path [-, alt=<9->{line width=1.2mm}{}] (D) edge node {$3$} (E);
    \path [-, alt=<7->{line width=1.2mm}{}] (E) edge node {$2$} (F);
    \path [-] (E) edge node {$6$} (B);
    \path [-, pos=0.25] (E) edge node {$4$} (C);
    \path [-, alt=<16->{line width=1.2mm}{}] (B) edge node {$3$} (C);
    \path [-, pos=0.25] (B) edge node {$5$} (F);
    \path [-] (F) edge node {$4$} (C);
\end{scope}
\end{tikzpicture}
\pause[16]
\end{frame}
\end{document}
```

I would like to highlight each node label once on the transition that it changes.  How can I do that?