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.
%I A370916 #13 Mar 17 2024 04:07:53
%S A370916 10,19,31,32,37,46,58,59,64,73,91,94,95,97,98,112,113,118,127,139,140,
%T A370916 145,154,172,175,176,178,179,193,194,199,208,220,221,226,235,274,275,
%U A370916 280,283,284,286,287,289,292,293,295,296,334,337,338,340,341,355,356
%N A370916 Positive integers whose ternary representation includes at least one 0, and every 0 is followed by 1.
%e A370916 The ternary representations of 10, 19, and 31 are 101, 201, and 1011.
%t A370916 Map[#[[1]] &, Select[Map[{#, #[[1]] > 0 && #[[1]] == #[[2]] &[{Length[
%t A370916 StringCases[#, "0"]], Length[StringCases[#, "01"]]}] &[
%t A370916 IntegerString[#, 3]]} &, Range[500]], #[[2]] &]]
%t A370916 (* _Peter J. C. Moses_, Mar 05 2024 *)
%Y A370916 Cf. A007089, A081605.
%Y A370916 Cf. A370917, A370918, A370919, A370920, A370921, A370922, A370923.
%K A370916 nonn,base
%O A370916 1,1
%A A370916 _Clark Kimberling_, Mar 13 2024