A079405 - OEIS

%I #8 Mar 13 2015 19:04:52

%S 2,2,2,4,2,3,5,3,4,4,3,6,4,5,7,4,4,4,7,5,6,6,5,5,6,5,6,8,6,4,7,4,7,5,

%T 6,4,7,6,8,7,7,5,4,5,7,5,4,6,8,6,6,6,6,5,8,7,7,7,10,6,7,6,9,4,5,7,5,8,

%U 9,7,6,6,9,8,8,7,7,8,7,8,6,6,6,7,7,8,8,9,7,8,10,9,10,6,7,7,7,5,6,6,9,8,7,7

%N Number of dots in primes in Braille.

%H American Foundation for the Blind, <a href="http://www.afb.org/braillebug/braille_deciphering.asp">Braille Bug</a>

%e The 5th prime is 11, hence a(11)=1+1=2

%o (PARI) { braille=[3,1,2,2,3,2,3,4,3,2]; forprime (n=2,300, b=braille[n%10+1]; n2=n; if (n>99, b=b+braille[n\100+1]; n2=n%100); if (n2>9,b=b+braille[n2\10+1]); print1(b",")) }

%o (PARI) { braille=[3, 1, 2, 2, 3, 2, 3, 4, 3, 2]; forprime (n=2, 300, n2=n; b=0; while (n2>0, b=b+braille[n2%10+1]; n2=n2\10); print1(b", ")) } \\ _Sean A. Irvine_, Feb 04 2010

%Y Cf. A079399, A072283.

%K nonn

%O 0,1

%A _Jon Perry_, Feb 16 2003

%E Corrected and extended by _Sean A. Irvine_, Feb 04 2010