STATUS
reviewed
approved
reviewed
approved
proposed
reviewed
editing
proposed
Table[Count[Union@ Map[# Boole[! CoprimeQ[#, n]] &@ FromDigits@ # &, Permutations@ IntegerDigits@ n], _?(# > 0 &)], {n, 105}] (* Michael De Vlieger, Dec 16 2017 *)
proposed
editing
editing
proposed
For a number like 12345 which is a multiple of three and does not contain zero, all 5! = 120 permutations yield a distinct number divisible by 3, thus a(12345) = 120. However, 120 occurs for the first time at n = 10236, which is also a multiple of three. - Antti Karttunen, Dec 16 2017
proposed
editing
editing
proposed
a(n) = is the number of numbers k such that k is obtained by permuting the digits of n and gcd(n,k) > 1.
reviewed
editing
proposed
reviewed
editing
proposed