function h=pdeplotn(p,e,t)

h=pdeplot(p,e,t);
hold on


pp = zeros(1,size(p,2)); 
 
for i=1:size(t,2); 
  for j=1:3; 
    tt = t(j,i); 
    if ~pp(tt), 
      text(p(1,tt),p(2,tt),sprintf('%i',tt));
      pp(tt)=1; 
      end
    end
  sum(p(1:2,t(1:3,i))')/3;
  text(ans(1),ans(2),sprintf('%i',i));
  end
hold off;
