%I A076493
%S A076493 1,0,0,0,1,1,0,0,0,2,1,1,1,1,1,1,0,0,1,1,1,0,1,0,2,1,2,1,0,1,1,1,0,0,1,
%T A076493 1,1,0,0,1,1,1,1,0,1,1,0,1,1,2,1,1,0,0,1,1,0,0,0,2,1,0,2,2,1,1,0,1,1,1,
%U A076493 1,0,1,2,1,2,0,1,0,1,1,1,1,0,1,1,1,0,1,1,1,0,1,0,2,2,1,1,1,2,2,2,2,2,3
%N A076493 Number of common (distinct) decimal digits of n and n^2.
%t A076493 Table[Length[Intersection[IntegerDigits[n], IntegerDigits[n^2]]], {n, 
               1, 100}]
%Y A076493 Cf. A006880, A076489-A076491.
%Y A076493 Sequence in context: A000164 A157746 A037820 this_sequence A037910 A162781 
               A056975
%Y A076493 Adjacent sequences: A076490 A076491 A076492 this_sequence A076494 A076495 
               A076496
%K A076493 base,nonn
%O A076493 1,10
%A A076493 Labos E. (labos(AT)ana.sote.hu), Oct 21 2002