login
A031228
Length of n-th run of digit 2 in A031219.
0
1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 2, 2, 5, 2, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2
OFFSET
1,5
MATHEMATICA
Length/@(If[MemberQ[#, 2], #, Nothing]&/@Split[Flatten[ IntegerDigits[ Range[ 400], 5]]]) (* Harvey P. Dale, Dec 19 2021 *)
CROSSREFS
Sequence in context: A327401 A091407 A031229 * A031227 A185358 A368247
KEYWORD
nonn,base
STATUS
approved