%I #8 Nov 21 2013 12:47:03
%S 13,94,117,175,256,337,418,499,580,661,742,823,846,904,985,1053,1147,
%T 1228,1309,1390,1471,1552,1575,1633,1714,1795,1876,1957,2038,2119,
%U 2200,2281,2304,2362,2443,2524,2605,2686,2767,2848
%N Numbers n such that string 1,4 occurs in the base 9 representation of n but not of n-1.
%t With[{c={1,4}},Select[Range[3000],MemberQ[Partition[IntegerDigits[ #,9], 2,1],c]&& !MemberQ[Partition[IntegerDigits[#-1,9],2,1],c]&]] (* _Harvey P. Dale_, Oct 31 2011 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_