A279916 Least b such that A279688(n) and 2*A279688(n) are anagrams in base b.

5, 4, 8, 4, 3, 5, 5, 14, 4, 4, 4, 3, 3, 3, 4, 3, 4, 4, 4, 4, 20, 8, 23, 8, 11, 5, 5, 26, 5, 3, 3, 3, 4, 3, 4, 29, 3, 3, 3, 4, 3, 3, 4, 3, 4, 32, 6, 4, 11, 4, 4, 4, 35, 4, 4, 11, 4, 4, 4, 4, 4, 7, 38, 4, 6, 4, 4, 4, 4, 8, 41, 11, 16, 8, 44, 3, 47, 3, 3, 3, 3, 3

Offset: 2

Author

Peter Kagey, Dec 23 2016

Keywords

• nonn
• base
• look

Examples

			A279688(2) = 8, and a(2) = 5 because 5 is the least base such that 8 and 16 are anagrams: 8 = 13_5 and 16 = 31_5.
		

Links

• Peter Kagey, Table of n, a(n) for n = 2..10000

Crossrefs

Cf. A023094, A279688, A279689.

Programs

Mathematica

DeleteCases[#, 0] &@ Table[Module[{b = 2}, While[2 b < n + 3 && Sort[IntegerDigits[n, b]] != Sort[IntegerDigits[2 n, b]], b++]; b Boole[2 b < n + 3]], {n, 780}] (* Michael De Vlieger, Dec 23 2016, after Robert G. Wilson v at A279688 *)