login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A123902 A123896 sorted and duplicates removed. 5
0, 1, 12, 100, 112, 121, 122, 123, 1012, 1023, 1102, 1122, 1123, 1200, 1201, 1203, 1213, 1222, 1223, 1231, 1232, 1233, 1234, 10000, 10012, 10023, 10102, 10123, 10201, 10202, 10203, 10213, 10223, 10231, 10232, 10234, 11023, 11102, 11200, 11203, 11211, 11213 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

REFERENCES

D. E. Knuth, The Art of Computer Programming, vol. 4A, Combinatorial Algorithms, Section 7.2.1.5, p. 432, Problems 4 and 5.

LINKS

R. J. Mathar, Table of n, a(n) for n = 0..4460

MATHEMATICA

f[n_] := Block[{d = Prepend[IntegerDigits@ n, 0], a, b, w}, b = DeleteDuplicates@ d; a = Range[0, Length@ b]; w = FromDigits@ Flatten[Part[a, FirstPosition[b, #]] & /@ d]; w]; Take[Union@ Table[f[n^2], {n, 0, 320}], 42] (* Michael De Vlieger, Dec 09 2015, Version 10 *)

CROSSREFS

Sequence in context: A004058 A052178 A322721 * A085374 A016283 A243880

Adjacent sequences:  A123899 A123900 A123901 * A123903 A123904 A123905

KEYWORD

nonn,base

AUTHOR

N. J. A. Sloane, Nov 20 2006

EXTENSIONS

More terms from Franklin T. Adams-Watters, Nov 20 2006

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 6 00:49 EDT 2022. Contains 357261 sequences. (Running on oeis4.)