OFFSET

1,1

LINKS

Wikipedia, Braille

EXAMPLE

VII in Braille (with the "Roman num" character):

o o o o

o o o

o o o

Therefore a(7) = 10 - 2 = 8.

PROG

(PARI) a=[2, 4, 6, 6, 4, 6, 8, 10, 6, 0]; b=[0, 4, 8, 12, 7, 3, 7, 11, 15, 6]; for(n=1, 72, if(n<100, print1(a[lift(Mod(n-1, 10))+1]+b[floor(n/10)+1], ", "), break));

(PARI)

/* The program works for n < 40 */

b=0; for(n=1, 39, if(Mod(n, 10)==0, b=b+4); m=lift(Mod(n, 10)); a=2*m-6; if(Mod(m, 5)==4, d=abs(a-7)+b+1, if(m<4, d=a+b+6, d=a+b)); print1(d, ", "));

CROSSREFS

KEYWORD

nonn,word,base

AUTHOR

Arkadiusz Wesolowski, Feb 25 2014

STATUS

approved