A057946 Bad hexadecimal notation for n: write n in hexadecimal notation, replacing digit ten with "10", digit eleven with "11", ... and digit fifteen with "15".

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 110, 111, 112, 113, 114, 115, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 210, 211, 212, 213, 214, 215, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 310, 311, 312, 313, 314, 315, 40, 41

Offset

0,3

Links

Alois P. Heinz, Table of n, a(n) for n = 0..10000

Example

a(15)=15 since it is represented by the digit "15" base 16. a(21)=15 since it is represented by the digit "1" followed by the digit "5" base 16.

Maple

a:= proc(n) local i, m, r ; m:=n; r:=NULL;
      if n=0 then return 0 fi;
      for i from 0 while m>0 do
        r:= irem(m, 16, 'm'), r
      od; parse(cat(r))
    end:
seq(a(n), n=0..80);  # Alois P. Heinz, Jun 23 2014

Mathematica

f[n_] := FromDigits@ Flatten@ IntegerDigits@ IntegerDigits[n, 16]; Array[f, 66, 0] (* Robert G. Wilson v, Jun 23 2014 *)

Crossrefs

Cf. A057947 for ambiguous numbers, A055645 for a better representation of hexadecimal.

Sequence in context: A058035 A366994 A365683 * A331270 A117657 A352529

Adjacent sequences: A057943 A057944 A057945 * A057947 A057948 A057949

Keyword

base,dumb,easy,nonn

Author

Henry Bottomley, Oct 13 2000

Status

approved