login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A109512 Integers which are not the sum of n and A001462(n). 3
0, 1, 3, 6, 9, 13, 17, 22, 27, 32, 38, 44, 50, 57, 64, 71, 78, 86, 94, 102, 110, 119, 128, 137, 146, 156, 166, 176, 186, 196, 207, 218, 229, 240, 251, 263, 275, 287, 299, 311, 324, 337, 350, 363, 376, 389, 403, 417, 431, 445, 459, 473, 488, 503, 518, 533, 548 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

COMMENTS

Terms computed by Robert G. Wilson v.

LINKS

Robert Price, Table of n, a(n) for n = 0..9999

EXAMPLE

Let N=succession of the natural numbers, G=Golomb self-describing sequence, S=sum of n and according G(n):

N=1.2.3.4.5..6..7..8..9.10.11.12.13.14.15.16.17.18.19.20.21.22

G=1,2,2,3,3,.4,.4,.4,.5,.5,.5,.6,.6,.6,.6,.7,.7,.7,.7,.8,.8,.8

S=2.4.5.7.8.10.11.12.14.15.16.18.19.20.21.23.24.25.26.28.29.30

Integers not in S (0,1,3,6,9,13,17,22...) form the sequence.

MATHEMATICA

a[1] = 1; a[n_] := a[n] = 1 + a[n - a[a[n - 1]]]; Do[ a[n], {n, 10^5}]; h = Complement[ Range[100000 + a[10^5]], Table[n + a[n], {n, 10000}]] t = Table[n + Sum[PrimePi[k], {k, 1, n}], {n, 0, 1200}]

CROSSREFS

Sequence in context: A280944 A205726 A002815 * A025205 A024190 A004116

Adjacent sequences:  A109509 A109510 A109511 * A109513 A109514 A109515

KEYWORD

base,easy,nonn

AUTHOR

Eric Angelini, Alexandre Wajnberg and Robert G. Wilson v, Aug 29 2005

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified May 25 04:36 EDT 2017. Contains 287008 sequences.