A055124 Base-14 complement of n (write n in base 14, then replace each digit with its base-14 negative).
0, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 182, 195, 194, 193, 192, 191, 190, 189, 188, 187, 186, 185, 184, 183, 168, 181, 180, 179, 178, 177, 176, 175, 174, 173, 172, 171, 170, 169, 154, 167, 166, 165, 164, 163, 162, 161, 160, 159, 158, 157, 156, 155, 140
Offset: 0
Links
- Reinhard Zumkeller, Table of n, a(n) for n = 0..2743 (2743 = 14^3 - 1)
- Index entries for sequences that are permutations of the natural numbers
Programs
-
Haskell
a055124 0 = 0 a055124 n = if d == 0 then 14 * a055124 n' else 14 * a055124 n' + 14 - d where (n', d) = divMod n 14 -- Reinhard Zumkeller, Mar 12 2014