A208090 100 written in base -n.
110100100, 10201, 13330, 400, 324, 202, 244, 271, 100, 121, 144, 169, 172
Offset: 2
Links
- Phil Haacked, Negative Base Numering System
- Daniel Mondot, Bases to -101, including digits >9
- Eric Weisstein's World of Mathematics, Base
Crossrefs
Cf. A065004.
Programs
-
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}]