This site is supported by donations to The OEIS Foundation.

 Annual Appeal: Please make a donation to keep the OEIS running. In 2018 we replaced the server with a faster one, added 20000 new sequences, and reached 7000 citations (often saying "discovered thanks to the OEIS"). Other ways to donate

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A109073 Number of decimal digits ( counted with multiplicity ) in n^2 but not in n. 0
 0, 0, 1, 1, 2, 1, 1, 2, 2, 2, 0, 1, 2, 2, 2, 2, 2, 3, 3, 2, 1, 2, 3, 2, 3, 1, 1, 1, 2, 3, 1, 2, 3, 4, 4, 3, 3, 3, 4, 4, 2, 2, 3, 3, 4, 3, 3, 4, 3, 3, 1, 3, 3, 4, 4, 3, 3, 4, 4, 4, 1, 3, 4, 2, 2, 3, 3, 4, 3, 3, 2, 3, 4, 3, 2, 2, 1, 4, 3, 4, 2, 3, 3, 2, 4, 3, 3, 3, 4, 3, 2, 3, 4, 3, 4, 2, 2, 2, 3, 3, 0, 1, 2, 2, 2 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,5 COMMENTS Cf. A076493 Number of common and distinct decimal digits of n and n^2, A109071 Number of common decimal digits ( counted with multiplicity ) of n and n^2, A109072 Number of decimal digits ( counted with multiplicity ) in n but not in n^2. LINKS EXAMPLE a(35)=4 because 34^2=1156 and there are 4 digits (counted with multiplicity) which are in 34^2 but not in 34. MATHEMATICA UnsortedComplement[x_List, y__List]:=Replace[x, Dispatch[(#\[RuleDelayed]Sequence[])&/@Union[y]], 1]; Table[Length[UnsortedComplement[IntegerDigits[n], IntegerDigits[n^2]]], {n, 0, 200}] CROSSREFS Cf. A076493, A109071, A109072. Sequence in context: A029256 A216501 A217463 * A255337 A026465 A051486 Adjacent sequences:  A109070 A109071 A109072 * A109074 A109075 A109076 KEYWORD base,easy,nonn AUTHOR Zak Seidov, Jun 20 2005 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified December 11 10:48 EST 2018. Contains 318049 sequences. (Running on oeis4.)