cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

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

This page as a plain text file.
%I A279916 #16 Dec 24 2016 11:16:19
%S A279916 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,
%T A279916 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,
%U A279916 4,6,4,4,4,4,8,41,11,16,8,44,3,47,3,3,3,3,3
%N A279916 Least b such that A279688(n) and 2*A279688(n) are anagrams in base b.
%H A279916 Peter Kagey, <a href="/A279916/b279916.txt">Table of n, a(n) for n = 2..10000</a>
%e A279916 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.
%t A279916 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 *)
%Y A279916 Cf. A023094, A279688, A279689.
%K A279916 nonn,base,look
%O A279916 2,1
%A A279916 _Peter Kagey_, Dec 23 2016