editing
approved
editing
approved
Rotating the most-significant digit in other bases defines related sequences: 1, 2, 9, 4, 35, 558, 2205, 8, 135, ... (base 2); 1, 32, 3, 88, 260, ... (base 3); 1, 18, 279, 4, 68985, ... (base 4); 1, 16, 3348, 411184, 5, ... (base 5); etc. - R. J. Mathar, Mar 30 2009
approved
editing
reviewed
approved
proposed
reviewed
editing
proposed
Rotating the most-significant digit in other bases defines related sequences: 1, 2, 9, 4, 35, 558, 2205, 8, 135, ... (base 2), ; 1, 32, 3, 88, 260, ... (base 3), ; 1, 18, 279, 4, 68985, ... (base 4), ; 1, 16, 3348, 411184, 5, ... (base 5) ; etc. - _R. J. Mathar, _, Mar 30 2009
Min[Table[Block[{d=Ceiling[Log[10, n]], m=(10n-1)/GCD[10n-1, a]}, If[m!=1, While[PowerMod[10, d, m]!=n, d++ ], d=1]; ((10^(d+1)-1) a n)/(10n-1)], {a, 9}]] - (* Anton V. Chupin (chupin(X)icmm.ru), Apr 12, 2007 *)
a(9) from Anton V. Chupin (chupin(X)icmm.ru), Apr 12, 2007
approved
editing
editing
approved
Rotating the most-significant digit in other bases defines related sequences: 1,2,9,4,35,558,2205,8,135,.. (base 2), 1,32,3,88,260,... (base 3), 1,18,279,4,68985,.. (base 4), 1,16,3348,411184,5,... (base 5) etc. - R. J. Mathar, Mar 30 2009
approved
editing
_Lekraj Beedassy (blekraj(AT)yahoo.com), _, Sep 21 2004
Code and b-file corrected by _Ray Chandler (rayjchandler(AT)sbcglobal.net), _, Apr 29 2009