login
A026499
a(n) = length of n-th run of identical symbols in A026498.
1
3, 1, 7, 1, 1, 3, 3, 1, 8, 1, 6, 1, 7, 1, 1, 3, 3, 1, 1, 7, 1, 3, 3, 1, 7, 1, 1, 3, 3, 1, 8, 1, 6, 1, 8, 1, 3, 3, 1, 1, 7, 1, 6, 1, 7, 1, 1, 3, 3, 1, 8, 1, 6, 1, 7, 1, 1, 3, 3, 1, 1, 7, 1, 3, 3, 1, 7, 1, 1, 3, 3, 1, 1, 7, 1, 6, 1, 8, 1, 3, 3, 1, 1, 7, 1, 3, 3, 1, 7, 1, 1, 3, 3, 1, 8
OFFSET
1,1
LINKS
MATHEMATICA
Length /@ Split@ Array[1 + Mod[DigitCount[3 # + 1, 2, 1], 2] &, 300, 0] (* Michael De Vlieger, Oct 03 2019 *)
CROSSREFS
Sequence in context: A272030 A340878 A346182 * A339452 A242114 A143470
KEYWORD
nonn
EXTENSIONS
Corrected and extended by Sean A. Irvine, Oct 03 2019
STATUS
approved