In[667]:= seq = {a, b, c, d} (* make "c" green" *)
Out[667]= {a, b, c, d} (recover "c" as green in color)