OFFSET
0,1
LINKS
Wikipedia, Braille
FORMULA
a(n) = a(floor(n/10))*64 + a(n mod 10) for n>9.
EXAMPLE
...... +-----+
n=0: . | _ . | -> (010)(110)
...... | . . | .. -> 010110[bin] = 22 = a(0)
...... | _ _ |
...... +-----+
n=1: . | . _ | -> (100)(000)
...... | _ _ | .. -> 100000[bin] = 32 = a(1)
...... | _ _ |
...... +-----+
n=2: . | . _ | -> (110)(000)
...... | . _ | .. -> 110000[bin] = 48 = a(2)
...... | _ _ |
...... +-----+
n=3: . | . . | -> (100)(100)
...... | _ _ | .. -> 100100[bin] = 36 = a(3)
...... | _ _ |
...... +-----+
n=4: . | . . | -> (100)(110)
...... | _ . | .. -> 100110[bin] = 38 = a(4)
...... | _ _ |
...... +-----+
n=5: . | . _ | -> (100)(010)
...... | _ . | .. -> 100100[bin] = 34 = a(5)
...... | _ _ |
...... +-----+
n=6: . | . . | -> (110)(100)
...... | . _ | .. -> 111000[bin] = 52 = a(6)
...... | _ _ |
...... +-----+
n=7: . | . . | -> (110)(110)
...... | . . | .. -> 110110[bin] = 54 = a(7)
...... | _ _ |
...... +-----+
n=8: . | . _ | -> (110)(010)
...... | . . | .. -> 101100[bin] = 50 = a(8)
...... | _ _ |
...... +-----+
n=9: . | _ . | -> (010)(100)
...... | . _ | .. -> 010100[bin] = 20 = a(9)
...... | _ _ |
...... +-----+.
MATHEMATICA
a[0]=22; a[1]= 32; a[2]= 48; a[3]= 36; a[4]= 38; a[5]= 34; a[6]= 52; a[7]= 54; a[8]= 50; a[9]=20; a[n_]:=a[Floor[n/10]]*64+a[Mod[n, 10]]; Table[a[n], {n, 0, 45}] (* James C. McMahon, Oct 12 2024 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Jul 23 2006
STATUS
approved