%I #7 Oct 12 2024 09:05:28
%S 28,32,40,48,52,36,56,60,44,24,2076,2080,2088,2096,2100,2084,2104,
%T 2108,2092,2072,2588,2592,2600,2608,2612,2596,2616,2620,2604,2584,
%U 3100,3104,3112,3120,3124,3108,3128,3132,3116,3096,3356,3360,3368,3376,3380,3364
%N Value of n written in Braille, seen as 3 X 2 bit-code: 1 for a raised dot and 0 for an empty dot position.
%C A000120(a(n)) = A079399(n).
%H Wikipedia, <a href="http://en.wikipedia.org/wiki/Braille">Braille</a>
%F a(n) = a(floor(n/10))*64 + a(n mod 10) for n>9.
%e ...... +-----+
%e n=0: . | _ . | -> (01)(11)(00)
%e ...... | . . | .. -> 011100[bin] = 28 = a(0)
%e ...... | _ _ |
%e ...... +-----+
%e n=1: . | . _ | -> (10)(00)(00)
%e ...... | _ _ | .. -> 100000[bin] = 32 = a(1)
%e ...... | _ _ |
%e ...... +-----+
%e n=2: . | . _ | -> (10)(10)(00)
%e ...... | . _ | .. -> 101000[bin] = 40 = a(2)
%e ...... | _ _ |
%e ...... +-----+
%e n=3: . | . . | -> (11)(00)(00)
%e ...... | _ _ | .. -> 110000[bin] = 48 = a(3)
%e ...... | _ _ |
%e ...... +-----+
%e n=4: . | . . | -> (11)(01)(00)
%e ...... | _ . | .. -> 110100[bin] = 52 = a(4)
%e ...... | _ _ |
%e ...... +-----+
%e n=5: . | . _ | -> (10)(01)(00)
%e ...... | _ . |.. -> 100100[bin] = 36 = a(5)
%e ...... | _ _ |
%e ...... +-----+
%e n=6: . | . . | -> (11)(10)(00)
%e ...... | . _ | .. -> 111000[bin] = 56 = a(6)
%e ...... | _ _ |
%e ...... +-----+
%e n=7: . | . . | -> (11)(11)(00)
%e ...... | . . | .. -> 111100[bin] = 60 = a(7)
%e ...... | _ _ |
%e ...... +-----+
%e n=8: . | . _ | -> (10)(11)(00)
%e ...... | . . | .. -> 101100[bin] = 44 = a(8)
%e ...... | _ _ |
%e ...... +-----+
%e n=9: . | _ . | -> (01)(10)(00)
%e ...... | . _ | .. -> 011000[bin] = 24 = a(9)
%e ...... | _ _ |
%e ...... +-----+.
%t a[0]=28;a[1]= 32;a[2]= 40;a[3]= 48;a[4]= 52;a[5]= 36;a[6]= 56;a[7]= 60;a[8]= 44;a[9]= 24;a[n_]:=a[Floor[n/10]]*64+a[Mod[n,10]];Table[a[n],{n,0,45}] (* _James C. McMahon_, Oct 11 2024 *)
%Y Cf. A121019.
%K nonn,base
%O 0,1
%A _Reinhard Zumkeller_, Jul 23 2006