| Author |
Comment/Response |
Peter Pein
|
 09/28/11 3:07pm
Hi,
$PrePrint can be used for this:
In[1]:= $PrePrint=(#/.{c_,0}:>FromCharacterCode[ToCharacterCode["a"]+c]&);
In[2]:= tab=Array[Sequence,{5,1},{0,0}]
Out[2]= {a,b,c,d,e}
In[3]:= tab/.{2,0}->"this is not a \"c\""
Out[3]= {a,b,this is not a "c",d,e}
In[4]:= $PrePrint=.
In[5]:= tab
Out[5]= {{0,0},{1,0},{2,0},{3,0},{4,0}}
URL: , |
|
