|
|
|
|
|
|
|
|
|
#13 by Michel Marcus at Fri Apr 24 08:17:27 EDT 2020
|
|
|
|
|
|
|
|
#12 by Joerg Arndt at Fri Apr 24 03:49:04 EDT 2020
|
|
|
|
|
|
Discussion
|
| Fri Apr 24
| 04:04
| Michel Marcus: distinct parts ?
|
|
| 04:31
| Amiram Eldar: Yes, but the name says "different".
|
|
| 08:17
| Michel Marcus: yes, but I think it should say distinct (another day then)
|
|
|
|
|
|
|
#11 by Amiram Eldar at Fri Apr 24 03:47:25 EDT 2020
|
|
|
|
|
|
|
|
#10 by Amiram Eldar at Fri Apr 24 03:29:41 EDT 2020
|
|
| LINKS
|
Amiram Eldar, <a href="/A036998/b036998.txt">Table of n, a(n) for n = 1..1000</a>
|
|
|
|
|
|
|
#9 by Amiram Eldar at Fri Apr 24 03:29:18 EDT 2020
|
|
| NAME
|
DecompositionsThe number of decompositions of n into different parts relatively prime to n.
|
|
| OFFSET
|
01,5
|
|
| EXTENSIONS
|
Offset corrected by Amiram Eldar, Apr 24 2020
|
|
| STATUS
|
approved
editing
|
|
|
|
|
|
|
#8 by Reinhard Zumkeller at Fri Jul 05 14:29:13 EDT 2013
|
|
|
|
|
|
|
|
#7 by Reinhard Zumkeller at Fri Jul 05 10:51:16 EDT 2013
|
|
| PROG
|
(Haskell)
a036998 n = p (a038566_row n) n where
p _ 0 = 1
p [] _ = 0
p (k:ks) m = if m < k then 0 else p ks (m - k) + p ks m
-- Reinhard Zumkeller, Jul 05 2013
|
|
| CROSSREFS
|
Cf. A057562, A038566, A079124.
|
|
| STATUS
|
approved
editing
|
|
|
|
|
|
|
#6 by Russ Cox at Fri Mar 30 18:37:41 EDT 2012
|
|
|
|
|
|
Discussion
|
| Fri Mar 30
| 18:37
| OEIS Server: https://oeis.org/edit/global/214
|
|
|
|
|
|
|
#5 by N. J. A. Sloane at Fri Feb 24 03:00:00 EST 2006
|
|
| MATHEMATICA
|
Table[ Coefficient[ Series[ Times@@((1+z^#)&/@Select[ Range[ q ], ], GCD[ #, [ #, q ]===1& ]), { & ]), { z, , 0, , q} ], } ], z^q ], { ], {q, , 128} ]
|
|
| KEYWORD
|
nonn,new
nonn
|
|
|
|
|
|
|
#4 by N. J. A. Sloane at Sun Feb 20 03:00:00 EST 2005
|
|
| KEYWORD
|
nonn,new
nonn
|
|
| AUTHOR
|
Wouter Meeussen (wwouter.meeussen.vdmcc(AT)vandemoortelepandora.be)
|
|
|
|
|
|
