OFFSET
1,1
REFERENCES
Ivan Grischenko, ivansasha(AT)mtu-net.ru, private communication.
LINKS
Harry J. Smith, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = prime(n) + composite(n).
From Jaroslav Krizek, Dec 13 2009: (Start)
a(n) = A171639(n+1). (End)
EXAMPLE
a(1)=6 because the first prime is 2 and the first composite is 4; 2 + 4 = 6
a(2)=9 because prime(2)=3 and composite(2)=6; 3 + 6 = 9.
MATHEMATICA
Module[{nn=100, cmps}, cmps=Select[Range[nn], CompositeQ]; Total/@Thread[{Prime[Range[ Length[ cmps]]], cmps}]] (* Harvey P. Dale, Mar 31 2024 *)
PROG
(PARI)
nextComp(n)= { if (!isprime(n), return(n)); return(n + 1) }
{ p=1; c=3; for (n=1, 100, p=nextprime(p + 1); c=nextComp(c + 1); print1(p + c, ", ") ) } \\ Harry J. Smith, Sep 25 2009
(Python)
from sympy import prime, composite
def A064799(n): return prime(n)+composite(n) # Chai Wah Wu, Aug 30 2021
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Konstantin Knop, Oct 21 2001
EXTENSIONS
More terms from Larry Reeves (larryr(AT)acm.org), Nov 12 2001
Offset changed from 0 to 1 by Harry J. Smith, Sep 25 2009
STATUS
approved