%I
%S 1,2,3,5,6,7,10,11,15,16,19,20,21,23,30,32,33,34,46,47,48,50,57,59,60,
%T 61,64,65,69,70,91,92,96,97,100,101,102,104,138,140,141,142,145,146,
%U 150,151,172,173,177,178,181,182,183,185,192
%N Numbers without consecutive equal base 3 digits.
%C Essentially the same as A043089, b.t.w. the initial "0" could be as well included here. Also: numbers n such that A043277(n)=1.  _M. F. Hasler_, Jul 23 2013
%F A031941 = { n  A043277(n)=1 } = A043089 \ {0}.  M. F. Hasler, Jul 23 2013
%o (PARI) for(i=1,199,A043277(i)==1 & print1(i",")) \\  _M. F. Hasler_, Jul 23 2013
%Y Cf. A000975 (base2 analog), A031942 or A043090 (base4 analog), A031943 or A043091 (base5 analog), A043092, ..., A043096 (base6 through base10 analog).
%K nonn,base
%O 1,2
%A _Clark Kimberling_
%E Edited by _Charles R Greathouse IV_, Aug 02 2010
