|
%I #20 Aug 15 2021 15:15:31
%S 1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111,
%T 1100100,10201,1210,400,244,202,144,121,100,91,84,79,72,-1,64,-1,-1,
%U 55,50,-1,-1,48,44,40,-1,-1,-1,-1,-1,37,34,31,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,28,26,24,22,20,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,19,18,17,16,15,14,13,12,11,10
%N 100 written in base n, or -1 if the representation requires digits outside of 0 to 9.
%C The term 111....1111 should officially be called the "unary expansion", since in base 1 only the digit 0 may appear.
%C Terms exist for some bases up to 100. - _T. D. Noe_, Mar 09 2012
%t Table[s = IntegerDigits[100, n]; If[Max[s] > 9, -1, FromDigits[s]], {n, 2, 100}] (* _T. D. Noe_, Mar 09 2012 *)
%Y Cf. A065147, A208090 (100 in base -n).
%K base,less,sign,fini,full
%O 1,1
%A _Bodo Zinser_, Nov 19 2001
%E Extended by _T. D. Noe_, Mar 09 2012
%E Title clarified by _Sean A. Irvine_, Aug 15 2021
|
