login
Value of n written in Braille, seen as 2 X 3 bit-code: 1 for a raised dot and 0 for an empty dot position.
2

%I #7 Oct 12 2024 14:45:56

%S 22,32,48,36,38,34,52,54,50,20,2070,2080,2096,2084,2086,2082,2100,

%T 2102,2098,2068,3094,3104,3120,3108,3110,3106,3124,3126,3122,3092,

%U 2326,2336,2352,2340,2342,2338,2356,2358,2354,2324,2454,2464,2480,2468,2470,2466

%N Value of n written in Braille, seen as 2 X 3 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: . | _ . | -> (010)(110)

%e ...... | . . | .. -> 010110[bin] = 22 = a(0)

%e ...... | _ _ |

%e ...... +-----+

%e n=1: . | . _ | -> (100)(000)

%e ...... | _ _ | .. -> 100000[bin] = 32 = a(1)

%e ...... | _ _ |

%e ...... +-----+

%e n=2: . | . _ | -> (110)(000)

%e ...... | . _ | .. -> 110000[bin] = 48 = a(2)

%e ...... | _ _ |

%e ...... +-----+

%e n=3: . | . . | -> (100)(100)

%e ...... | _ _ | .. -> 100100[bin] = 36 = a(3)

%e ...... | _ _ |

%e ...... +-----+

%e n=4: . | . . | -> (100)(110)

%e ...... | _ . | .. -> 100110[bin] = 38 = a(4)

%e ...... | _ _ |

%e ...... +-----+

%e n=5: . | . _ | -> (100)(010)

%e ...... | _ . | .. -> 100100[bin] = 34 = a(5)

%e ...... | _ _ |

%e ...... +-----+

%e n=6: . | . . | -> (110)(100)

%e ...... | . _ | .. -> 111000[bin] = 52 = a(6)

%e ...... | _ _ |

%e ...... +-----+

%e n=7: . | . . | -> (110)(110)

%e ...... | . . | .. -> 110110[bin] = 54 = a(7)

%e ...... | _ _ |

%e ...... +-----+

%e n=8: . | . _ | -> (110)(010)

%e ...... | . . | .. -> 101100[bin] = 50 = a(8)

%e ...... | _ _ |

%e ...... +-----+

%e n=9: . | _ . | -> (010)(100)

%e ...... | . _ | .. -> 010100[bin] = 20 = a(9)

%e ...... | _ _ |

%e ...... +-----+.

%t 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 *)

%Y Cf. A121018.

%K nonn,base

%O 0,1

%A _Reinhard Zumkeller_, Jul 23 2006