The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A337171 a(n) = A004186(n) mod n. 1
 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 9, 5, 13, 6, 13, 3, 9, 15, 0, 0, 0, 9, 18, 2, 10, 18, 26, 5, 0, 0, 0, 0, 9, 18, 27, 36, 7, 15, 0, 0, 0, 0, 0, 9, 18, 27, 36, 45, 0, 0, 0, 0, 0, 0, 9, 18, 27, 36, 0, 0, 0, 0, 0, 0, 0, 9, 18, 27, 0, 0, 0, 0, 0, 0, 0, 0, 9, 18 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,12 LINKS Simon Strandgaard, Plot of 1000 terms EXAMPLE a(12) = A004186(12) mod 12 = 21 mod 12 = 9, a(13) = A004186(13) mod 13 = 31 mod 13 = 5, a(14) = A004186(14) mod 14 = 41 mod 14 = 13, a(15) = A004186(15) mod 15 = 51 mod 15 = 6, a(16) = A004186(16) mod 16 = 61 mod 16 = 13. MATHEMATICA a[n_] := Mod[FromDigits @ Sort[IntegerDigits[n], Greater], n]; Array[a, 100] (* Amiram Eldar, Jan 30 2021 *) PROG (Ruby) values = (1..20).map do |n|     n.to_s.split('').sort.join.reverse.to_i % n end p values (PARI) a(n) = fromdigits(vecsort(digits(n), , 4)) % n; \\ Michel Marcus, Mar 04 2021 CROSSREFS Cf. A004186. Cf. A319650 (similar in binary). Sequence in context: A197685 A220510 A078086 * A061467 A103168 A298584 Adjacent sequences:  A337168 A337169 A337170 * A337172 A337173 A337174 KEYWORD nonn,base AUTHOR Simon Strandgaard, Jan 28 2021 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 May 8 02:26 EDT 2021. Contains 343652 sequences. (Running on oeis4.)