|
%I #16 Aug 06 2022 18:44:25
%S 0,1,2,3,4,5,8,9,10,11,15,16,17,22,23,29,51,52,53,58,59,65,94,95,101,
%T 137,310,311,317,353,569,1865
%N Metadromes: digits in base 6 are in strict ascending order.
%e 0 = 0(6).
%e 8 = 12(6).
%e 51 = 123(6).
%e 310 = 1234(6).
%e 1865 = 12345(6).
%t Select[Range[0,1900],Min[Differences[IntegerDigits[#,6]]]>0&] (* _Harvey P. Dale_, Aug 06 2022 *)
%K nonn,base,fini,full,easy
%O 1,3
%A _Olivier Gérard_, Jun 14 1998
|
