The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A088433 Number of ways to write n as n = u*v*w with 1<=u<=v
 0, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 4, 1, 2, 2, 3, 1, 3, 1, 4, 2, 2, 1, 6, 1, 2, 2, 4, 1, 5, 1, 4, 2, 2, 2, 7, 1, 2, 2, 6, 1, 5, 1, 4, 4, 2, 1, 8, 1, 3, 2, 4, 1, 6, 2, 6, 2, 2, 1, 10, 1, 2, 4, 5, 2, 5, 1, 4, 2, 5, 1, 11, 1, 2, 3, 4, 2, 5, 1, 9, 3, 2, 1, 10, 2, 2, 2, 6, 1, 10, 2, 4, 2, 2, 2, 12, 1, 3, 4, 6 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,6 COMMENTS a(n) = 1 iff n prime or n prime^2: a(A000430(n))=1. LINKS Antti Karttunen, Table of n, a(n) for n = 1..2048 EXAMPLE n=12: (1,1,12), (1,2,6), (1,3,4), (2,2,3): therefore a(12)=4; n=18: (1,1,18), (1,2,9), (1,3,6): therefore a(18)=3. PROG (PARI) A088433(n) = { my(s=0); fordiv(n, u, for(v=u, n-1, for(w=v+1, n, if(u*v*w==n, s++)))); (s); }; \\ Antti Karttunen, Aug 24 2017 CROSSREFS Cf. A034836, A088432, A088434, A122179, A122180. Sequence in context: A116933 A194448 A238950 * A264440 A303386 A295636 Adjacent sequences:  A088430 A088431 A088432 * A088434 A088435 A088436 KEYWORD nonn AUTHOR Reinhard Zumkeller, Oct 01 2003 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
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified February 17 00:49 EST 2020. Contains 331976 sequences. (Running on oeis4.)