[go: up one dir, main page]

login
A043799
Numbers n such that number of runs in the base 3 representation of n is congruent to 1 mod 8.
0
1, 2, 4, 8, 13, 26, 40, 80, 121, 242, 364, 728, 1093, 2186, 3280, 6560, 7381, 7382, 7386, 7387, 7390, 7391, 7392, 7394, 7428, 7430, 7431, 7432, 7435, 7436, 7440, 7441, 7462, 7463, 7467, 7468, 7471, 7472, 7473, 7475, 7482
OFFSET
1,2
MATHEMATICA
Select[Range[8000], Mod[Length[Split[IntegerDigits[#, 3]]], 8]==1&] (* Harvey P. Dale, Mar 07 2013 *)
CROSSREFS
Sequence in context: A043781 A043786 A043792 * A043807 A043816 A048328
KEYWORD
nonn,base
STATUS
approved