%I #8 Nov 21 2013 12:47:03
%S 15,51,87,90,123,159,195,231,267,303,306,339,375,411,447,483,519,522,
%T 540,591,627,663,699,735,738,771,807,843,879,915,951,954,987,1023,
%U 1059,1095,1131,1167,1170,1203,1239,1275,1311,1347
%N Numbers n such that string 2,3 occurs in the base 6 representation of n but not of n-1.
%t Select[Range[1500],MemberQ[Partition[IntegerDigits[#,6],2,1],{2,3}] && !MemberQ[Partition[IntegerDigits[#-1,6],2,1],{2,3}]&] (* _Harvey P. Dale_, Mar 16 2012 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_