login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A321379 Number of ways to write n as n = a*b*c*d with 1 < a <= b <= c <= d < n. 1
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0, 0, 0, 2, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 4 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,48
COMMENTS
This sequence is different from A101638.
If p is prime, a(p^k) = A026810(k). - Robert Israel, Nov 08 2018
LINKS
EXAMPLE
16 = 2*2*2*2. So a(16) = 1.
24 = 2*2*2*3. So a(24) = 1.
MAPLE
N:= 100: # for a(1)..a(N)
V:= Vector(N):
for a from 2 to floor(N^(1/4)) do
for b from a to floor((N/a)^(1/3)) do
for c from b to floor((N/a/b)^(1/2)) do
for d from c to N/(a*b*c) do
V[a*b*c*d]:= V[a*b*c*d]+1
od od od od:
convert(V, list); # Robert Israel, Nov 08 2018
CROSSREFS
Sequence in context: A194024 A082786 A101638 * A070141 A088722 A336917
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Nov 08 2018
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 25 07:41 EDT 2024. Contains 371964 sequences. (Running on oeis4.)