OFFSET
2,1
LINKS
Phil Haacked, Negative Base Numering System
Daniel Mondot, Bases to -101, including digits >9
Eric Weisstein's World of Mathematics, Base
MATHEMATICA
(* From MathWorld *) NegativeIntegerDigits[0, n_Integer?Negative] := {0}; NegativeIntegerDigits[i_, n_Integer?Negative] := Rest@Reverse@Mod[NestWhileList[(# - Mod[#, -n])/n &, i, # != 0 &], -n]; Table[FromDigits[NegativeIntegerDigits[100, -n]], {n, 2, 14}]
CROSSREFS
KEYWORD
nonn,fini,full,less
AUTHOR
Radu Borza, Mar 07 2012
STATUS
approved