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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A119965 The 3-almost primeth recurrence: a(0) = 1, a(n+1) = 3-almostprime(a(n)) = A014612(a(n)). 1
1, 8, 42, 174, 705, 2764, 10772, 41967, 164793, 654242, 2634801, 10787937, 44983894, 191249703, 829651874, 3673967785, 16612478231, 76708135651, 361707435767, 1741601413569, 8561660600005 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

COMMENTS

3-almostprime equivalent of Wilson's primeth recurrence: A007097.

LINKS

Table of n, a(n) for n=0..20.

MATHEMATICA

ThreeAlmostPrimePi[n_] := Sum[PrimePi[n/(Prime@i*Prime@j)] - j + 1, {i, PrimePi[n^(1/3)]}, {j, i, PrimePi@Sqrt[n/Prime@i]}]; ThreeAlmostPrime[n_] := Block[{e = Floor[Log[2, n] + 1], a, b}, a = 2^e; Do[b = 2^p; While[ThreeAlmostPrimePi[a] < n, a = a + b]; a = a - b/2, {p, e, 0, -1}]; a + b/2]; NestList[ThreeAlmostPrime@# &, 1, 18]

CROSSREFS

Cf. A007097, A105999, A119966.

Sequence in context: A234860 A027903 A231069 * A229729 A055082 A212337

Adjacent sequences:  A119962 A119963 A119964 * A119966 A119967 A119968

KEYWORD

nonn

AUTHOR

Jonathan Vos Post and Robert G. Wilson v, May 31 2006

EXTENSIONS

a(19)-a(20) from Donovan Johnson, Sep 29 2010

STATUS

approved

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

Content is available under The OEIS End-User License Agreement .

Last modified October 21 14:25 EDT 2014. Contains 248377 sequences.