BBC Russian

Revision History for A079401

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing all changes.

A079401

Partial sums of A079399.
(history; published version)

#8 by Wesley Ivan Hurt at Fri Jun 09 23:07:09 EDT 2023

STATUS

editing

approved

#7 by Wesley Ivan Hurt at Fri Jun 09 23:06:45 EDT 2023

EXAMPLE

a(3) = 3+1+2 = 6.

CROSSREFS

Cf. A079399.

STATUS

approved

editing

#6 by Harvey P. Dale at Mon Aug 08 10:33:54 EDT 2016

STATUS

editing

approved

#5 by Harvey P. Dale at Mon Aug 08 10:33:49 EDT 2016

MATHEMATICA

Accumulate[With[{br=Thread[Range[0, 9]->{3, 1, 2, 2, 3, 2, 3, 4, 3, 2}]}, Total/@ Table[ IntegerDigits[n]/.br, {n, 0, 100}]]] (* Harvey P. Dale, Aug 08 2016 *)

STATUS

approved

editing

#4 by Russ Cox at Sat Mar 31 13:21:55 EDT 2012

AUTHOR

_Jon Perry (perry(AT)globalnet.co.uk), _, Feb 16 2003

Discussion

Sat Mar 31

13:21

OEIS Server: https://oeis.org/edit/global/886

#3 by N. J. A. Sloane at Wed Sep 21 03:00:00 EDT 2005

CROSSREFS

Cf. A000001.

KEYWORD

nonn,new

nonn

#2 by N. J. A. Sloane at Thu Feb 19 03:00:00 EST 2004

PROG

(PARI) { braille=[3, 1, 2, 2, 3, 2, 3, 4, 3, 2]; bs=0; for (n=0, 99, b=braille[n%10+1]; if (n>9, b=b+braille[n\10+1]); bs=bs+b; print1(bs", ")) }

KEYWORD

nonn,new

nonn

#1 by N. J. A. Sloane at Fri May 16 03:00:00 EDT 2003

NAME

Partial sums of A079399.

DATA

3, 4, 6, 8, 11, 13, 16, 20, 23, 25, 29, 31, 34, 37, 41, 44, 48, 53, 57, 60, 65, 68, 72, 76, 81, 85, 90, 96, 101, 105, 110, 113, 117, 121, 126, 130, 135, 141, 146, 150, 156, 160, 165, 170, 176, 181, 187, 194, 200, 205, 210, 213, 217, 221, 226, 230, 235, 241, 246, 250

OFFSET

1,1

EXAMPLE

a(3)=3+1+2=6.

PROG

(PARI) { braille=[3, 1, 2, 2, 3, 2, 3, 4, 3, 2]; bs=0; for (n=0, 99, b=braille[n%10+1]; if (n>9, b=b+braille[n\10+1]); bs=bs+b; print1(bs", ")) }

CROSSREFS

Cf. A000001.

KEYWORD

nonn

AUTHOR

Jon Perry (perry(AT)globalnet.co.uk), Feb 16 2003

STATUS

approved