cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-10 of 10 results.

A097986 Number of strict integer partitions of n with a part dividing all the other parts.

Original entry on oeis.org

1, 1, 2, 2, 2, 4, 3, 5, 5, 7, 6, 12, 9, 13, 15, 20, 18, 28, 26, 37, 39, 47, 49, 71, 68, 85, 94, 117, 120, 159, 160, 201, 216, 257, 277, 348, 357, 430, 470, 562, 592, 720, 758, 901, 981, 1134, 1220, 1457, 1542, 1798, 1952, 2250, 2419, 2819, 3023, 3482, 3773, 4291
Offset: 1

Views

Author

Vladeta Jovovic, Oct 23 2004

Keywords

Comments

If n > 0, we can assume such a part is the smallest. - Gus Wiseman, Apr 23 2021
Also the number of uniform (constant multiplicity) partitions of n containing 1, ranked by A367586. The strict case is A096765. The version without 1 is A329436. - Gus Wiseman, Dec 01 2023

Examples

			From _Gus Wiseman_, Dec 01 2023: (Start)
The a(1) = 1 through a(8) = 5 strict partitions with a part dividing all the other parts:
  (1)  (2)  (3)    (4)    (5)    (6)      (7)      (8)
            (2,1)  (3,1)  (4,1)  (4,2)    (6,1)    (6,2)
                                 (5,1)    (4,2,1)  (7,1)
                                 (3,2,1)           (4,3,1)
                                                   (5,2,1)
The a(1) = 1 through a(8) = 5 uniform partitions containing 1:
  (1)  (11)  (21)   (31)    (41)     (51)      (61)       (71)
             (111)  (1111)  (11111)  (321)     (421)      (431)
                                     (2211)    (1111111)  (521)
                                     (111111)             (3311)
                                                          (11111111)
(End)
		

Crossrefs

The non-strict version is A083710.
The case with no 1's is A098965.
The Heinz numbers of these partitions are A339563.
The strict complement is counted by A341450.
The version for "divisible by" instead of "dividing" is A343347.
The case where there is also a part divisible by all the others is A343378.
The case where there is no part divisible by all the others is A343381.
A000005 counts divisors.
A000009 counts strict partitions.
A000070 counts partitions with a selected part.
A006128 counts partitions with a selected position.
A015723 counts strict partitions with a selected part.
A018818 counts partitions into divisors (strict: A033630).
A167865 counts strict chains of divisors > 1 summing to n.

Programs

  • Mathematica
    Take[ CoefficientList[ Expand[ Sum[x^k*Product[1 + x^(k*i), {i, 2, 62}], {k, 62}]], x], {2, 60}] (* Robert G. Wilson v, Nov 01 2004 *)
    Table[Length[Select[IntegerPartitions[n], UnsameQ@@#&&Or@@Table[And@@IntegerQ/@(#/x), {x,#}]&]], {n,0,30}] (* Gus Wiseman, Apr 23 2021 *)
  • PARI
    A_x(N) = {my(x='x+O('x^N)); Vec(sum(k=1,N,x^k*prod(i=2,N-k, (1+x^(k*i)))))}
    A_x(50) \\ John Tyler Rascoe, Nov 19 2024

Formula

a(n) = Sum_{d|n} A025147(d-1).
G.f.: Sum_{k>=1} (x^k*Product_{i>=2} (1+x^(k*i))).
a(n) ~ exp(Pi*sqrt(n/3)) / (8*3^(1/4)*n^(3/4)). - Vaclav Kotesovec, Jul 06 2025

Extensions

More terms from Robert G. Wilson v, Nov 01 2004
Name shortened by Gus Wiseman, Apr 23 2021

A341450 Number of strict integer partitions of n that are empty or have smallest part not dividing all the others.

Original entry on oeis.org

1, 0, 0, 0, 0, 1, 0, 2, 1, 3, 3, 6, 3, 9, 9, 12, 12, 20, 18, 28, 27, 37, 42, 55, 51, 74, 80, 98, 105, 136, 137, 180, 189, 232, 255, 308, 320, 403, 434, 512, 551, 668, 706, 852, 915, 1067, 1170, 1370, 1453, 1722, 1860, 2145, 2332, 2701, 2899, 3355, 3626, 4144
Offset: 0

Views

Author

Gus Wiseman, Apr 15 2021

Keywords

Comments

Alternative name: Number of strict integer partitions of n with no part dividing all the others.

Examples

			The a(0) = 1 through a(15) = 12 strict partitions (empty columns indicated by dots, 0 represents the empty partition, A..D = 10..13):
  0  .  .  .  .  32   .  43   53   54    64    65    75    76    86     87
                         52        72    73    74    543   85    95     96
                                   432   532   83    732   94    A4     B4
                                               92          A3    B3     D2
                                               542         B2    653    654
                                               632         643   743    753
                                                           652   752    762
                                                           742   932    843
                                                           832   5432   852
                                                                        942
                                                                        A32
                                                                        6432
		

Crossrefs

The complement is counted by A097986 (non-strict: A083710, rank: A339563).
The complement with no 1's is A098965 (non-strict: A083711).
The non-strict version is A338470.
The Heinz numbers of these partitions are A339562 (non-strict: A342193).
The case with greatest part not divisible by all others is A343379.
The case with greatest part divisible by all others is A343380.
A000009 counts strict partitions (non-strict: A000041).
A000070 counts partitions with a selected part.
A006128 counts partitions with a selected position.
A015723 counts strict partitions with a selected part.
A167865 counts strict chains of divisors > 1 summing to n.
Sequences with similar formulas: A024994, A047966, A047968, A168111.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],#=={}||UnsameQ@@#&&!And@@IntegerQ/@(#/Min@@#)&]],{n,0,30}]

Formula

a(n > 0) = A000009(n) - Sum_{d|n} A025147(d-1).

A339562 Squarefree numbers with no prime index dividing all the other prime indices.

Original entry on oeis.org

1, 15, 33, 35, 51, 55, 69, 77, 85, 91, 93, 95, 105, 119, 123, 141, 143, 145, 155, 161, 165, 177, 187, 195, 201, 203, 205, 209, 215, 217, 219, 221, 231, 247, 249, 253, 255, 265, 285, 287, 291, 295, 299, 301, 309, 323, 327, 329, 335, 341, 345, 355, 357, 377, 381
Offset: 1

Views

Author

Gus Wiseman, Apr 10 2021

Keywords

Comments

First differs from A342193 in lacking 45.
Alternative name: 1 and squarefree numbers with smallest prime index not dividing all the other prime indices.
A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.
Also 1 and Heinz numbers of strict integer partitions with smallest part not dividing all the others (counted by A341450). The Heinz number of a partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k), giving a bijective correspondence between positive integers and integer partitions.

Examples

			The sequence of terms together with their prime indices begins:
      1: {}         141: {2,15}     219: {2,21}
     15: {2,3}      143: {5,6}      221: {6,7}
     33: {2,5}      145: {3,10}     231: {2,4,5}
     35: {3,4}      155: {3,11}     247: {6,8}
     51: {2,7}      161: {4,9}      249: {2,23}
     55: {3,5}      165: {2,3,5}    253: {5,9}
     69: {2,9}      177: {2,17}     255: {2,3,7}
     77: {4,5}      187: {5,7}      265: {3,16}
     85: {3,7}      195: {2,3,6}    285: {2,3,8}
     91: {4,6}      201: {2,19}     287: {4,13}
     93: {2,11}     203: {4,10}     291: {2,25}
     95: {3,8}      205: {3,13}     295: {3,17}
    105: {2,3,4}    209: {5,8}      299: {6,9}
    119: {4,7}      215: {3,14}     301: {4,14}
    123: {2,13}     217: {4,11}     309: {2,27}
		

Crossrefs

The squarefree complement is A339563.
These partitions are counted by A341450.
The not necessarily squarefree version is A342193.
A000005 counts divisors.
A000070 counts partitions with a selected part.
A001221 counts distinct prime factors.
A005117 lists squarefree numbers.
A006128 counts partitions with a selected position (strict: A015723).
A056239 adds up prime indices (row sums of A112798).
A083710 counts partitions with a dividing part (strict: A097986).

Programs

  • Mathematica
    Select[Range[100],#==1||SquareFreeQ[#]&&With[{p=PrimePi/@First/@FactorInteger[#]},!And@@IntegerQ/@(p/Min@@p)]&]

A343379 Number of strict integer partitions of n with no part dividing or divisible by all the other parts.

Original entry on oeis.org

1, 0, 0, 0, 0, 1, 0, 2, 1, 3, 3, 5, 3, 9, 9, 12, 12, 18, 18, 27, 27, 36, 41, 51, 51, 73, 80, 96, 105, 132, 137, 177, 188, 230, 253, 303, 320, 398, 431, 508, 550, 659, 705, 847, 913, 1063, 1165, 1359, 1452, 1716, 1856, 2134, 2329, 2688, 2894, 3345, 3622, 4133
Offset: 0

Views

Author

Gus Wiseman, Apr 16 2021

Keywords

Comments

Alternative name: Number of strict integer partitions of n that are either empty, or (1) have smallest part not dividing all the others and (2) have greatest part not divisible by all the others.

Examples

			The a(5) = 1 through a(13) = 9 partitions (empty column indicated by dot):
  (3,2)  .  (4,3)  (5,3)  (5,4)    (6,4)    (6,5)    (7,5)    (7,6)
            (5,2)         (7,2)    (7,3)    (7,4)    (5,4,3)  (8,5)
                          (4,3,2)  (5,3,2)  (8,3)    (7,3,2)  (9,4)
                                            (9,2)             (10,3)
                                            (5,4,2)           (11,2)
                                                              (6,4,3)
                                                              (6,5,2)
                                                              (7,4,2)
                                                              (8,3,2)
		

Crossrefs

The first condition alone gives A341450.
The non-strict version is A343342 (Heinz numbers: A343338).
The second condition alone gives A343377.
The opposite version is A343378.
The half-opposite versions are A343380 and A343381.
The version for "or" instead of "and" is A343382.
A000009 counts strict partitions.
A000070 counts partitions with a selected part.
A006128 counts partitions with a selected position.
A015723 counts strict partitions with a selected part.
A018818 counts partitions into divisors (strict: A033630).
A167865 counts strict chains of divisors > 1 summing to n.
A339564 counts factorizations with a selected factor.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],#=={}||UnsameQ@@#&&!And@@IntegerQ/@(#/Min@@#)&&!And@@IntegerQ/@(Max@@#/#)&]],{n,0,30}]

Formula

The Heinz numbers for the non-strict version are A343338 = A342193 /\ A343337.

A343347 Number of strict integer partitions of n with a part divisible by all the others.

Original entry on oeis.org

1, 1, 1, 2, 2, 2, 3, 3, 3, 4, 4, 4, 6, 5, 4, 6, 6, 6, 8, 7, 7, 10, 9, 9, 12, 10, 8, 11, 11, 10, 14, 13, 11, 13, 12, 15, 20, 17, 15, 19, 19, 19, 22, 18, 17, 23, 22, 22, 28, 25, 24, 31, 28, 26, 32, 32, 30, 34, 32, 29, 37, 33, 27, 36, 33, 34, 44, 38, 36, 45, 45
Offset: 0

Views

Author

Gus Wiseman, Apr 16 2021

Keywords

Comments

Alternative name: Number of strict integer partitions of n that are empty or have greatest part divisible by all the others.

Examples

			The a(1) = 1 through a(15) = 6 partitions (A..F = 10..15):
  1  2  3   4   5   6   7    8   9    A    B    C     D    E    F
        21  31  41  42  61   62  63   82   A1   84    C1   C2   A5
                    51  421  71  81   91   632  93    841  D1   C3
                                 621  631  821  A2    931  842  E1
                                                B1    A21       C21
                                                6321            8421
		

Crossrefs

The dual version is A097986 (non-strict: A083710).
The non-strict version is A130689 (Heinz numbers: complement of A343337).
The strict complement is counted by A343377.
The case with smallest part divisible by all the others is A343378.
The case with smallest part not divisible by all the others is A343380.
A000005 counts divisors.
A000009 counts strict partitions.
A000070 counts partitions with a selected part.
A015723 counts strict partitions with a selected part.
A018818 counts partitions into divisors (strict: A033630).
A167865 counts strict chains of divisors > 1 summing to n.
A339564 counts factorizations with a selected factor.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],#=={}||UnsameQ@@#&&And@@IntegerQ/@(Max@@#/#)&]],{n,0,30}]
  • PARI
    seq(n)={Vec(1 + sum(m=1, n, my(u=divisors(m)); x^m*prod(i=1, #u-1, 1 + x^u[i] + O(x^(n-m+1)))))} \\ Andrew Howroyd, Apr 17 2021

Formula

G.f.: 1 + Sum_{k>0} (x^k/(1 + x^k))*Product_{d|k} (1 + x^d). - Andrew Howroyd, Apr 17 2021

A343378 Number of strict integer partitions of n that are empty or such that (1) the smallest part divides every other part and (2) the greatest part is divisible by every other part.

Original entry on oeis.org

1, 1, 1, 2, 2, 2, 3, 3, 3, 4, 4, 3, 6, 5, 4, 6, 6, 4, 8, 6, 7, 9, 8, 5, 12, 9, 8, 9, 11, 6, 14, 10, 10, 11, 10, 10, 20, 12, 12, 15, 18, 10, 21, 13, 15, 19, 17, 11, 27, 19, 20, 20, 25, 13, 27, 22, 26, 23, 24, 15, 34, 23, 21, 27, 30, 19, 38, 24, 26, 27, 37
Offset: 0

Views

Author

Gus Wiseman, Apr 16 2021

Keywords

Comments

Alternative name: Number of strict integer partitions of n with a part dividing all the others and a part divisible by all the others.

Examples

			The a(1) = 1 through a(15) = 6 partitions (A..F = 10..15):
  1  2  3   4   5   6   7    8   9    A    B    C     D    E    F
        21  31  41  42  61   62  63   82   A1   84    C1   C2   A5
                    51  421  71  81   91   821  93    841  D1   C3
                                 621  631       A2    931  842  E1
                                                B1    A21       C21
                                                6321            8421
		

Crossrefs

The first condition alone gives A097986.
The non-strict version is A130714 (Heinz numbers are complement of A343343).
The second condition alone gives A343347.
The opposite version is A343379.
The half-opposite versions are A343380 and A343381.
The strict complement is counted by A343382.
A000009 counts strict partitions.
A000070 counts partitions with a selected part.
A006128 counts partitions with a selected position.
A015723 counts strict partitions with a selected part.
A018818 counts partitions into divisors (strict: A033630).
A167865 counts strict chains of divisors > 1 summing to n.
A339564 counts factorizations with a selected factor.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],#=={}||UnsameQ@@#&&And@@IntegerQ/@(#/Min@@#)&&And@@IntegerQ/@(Max@@#/#)&]],{n,0,30}]

A343381 Number of strict integer partitions of n with a part dividing all the others but no part divisible by all the others.

Original entry on oeis.org

1, 0, 0, 0, 0, 0, 1, 0, 2, 1, 3, 3, 6, 4, 9, 9, 14, 14, 20, 20, 30, 30, 39, 44, 59, 59, 77, 85, 106, 114, 145, 150, 191, 205, 247, 267, 328, 345, 418, 455, 544, 582, 699, 745, 886, 962, 1117, 1209, 1430, 1523, 1778, 1932, 2225, 2406, 2792, 3001, 3456, 3750
Offset: 0

Views

Author

Gus Wiseman, Apr 16 2021

Keywords

Comments

Alternative name: Number of strict integer partitions of n that are empty or (1) have smallest part dividing all the others and (2) have greatest part not divisible by all the others.

Examples

			The a(6) = 1 through a(16) = 14 partitions (empty column indicated by dot, A..D = 10..13):
  321   .  431   531   541    641    642    751    761    861     862
           521         721    731    651    5431   851    951     871
                       4321   5321   741    6421   941    A41     961
                                     831    7321   A31    B31     A42
                                     921           B21    6531    B41
                                     5421          6431   7431    D21
                                                   6521   7521    6541
                                                   7421   9321    7531
                                                   8321   54321   7621
                                                                  8431
                                                                  8521
                                                                  9421
                                                                  A321
                                                                  64321
		

Crossrefs

The first condition alone gives A097986.
The non-strict version is A343345 (Heinz numbers: A343340).
The second condition alone gives A343377.
The half-opposite versions are A343378 and A343379.
The opposite (and dual) version is A343380.
A000005 counts divisors.
A000009 counts strict partitions.
A000070 counts partitions with a selected part.
A006128 counts partitions with a selected position.
A015723 counts strict partitions with a selected part.
A018818 counts partitions into divisors (strict: A033630).
A167865 counts strict chains of divisors > 1 summing to n.
A339564 counts factorizations with a selected factor.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],#=={}||UnsameQ@@#&&And@@IntegerQ/@(#/Min@@#)&&!And@@IntegerQ/@(Max@@#/#)&]],{n,0,30}]

A343344 Number of integer partitions of n that are either empty, or do not have smallest part dividing all the others, but do have greatest part divisible by all the others.

Original entry on oeis.org

1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1, 1, 5, 1, 6, 4, 6, 7, 15, 6, 16, 15, 20, 17, 36, 18, 43, 36, 46, 48, 72, 45, 93, 82, 103, 88, 152, 104, 179, 158, 191, 194, 285, 202, 328, 292, 373, 348, 502, 391, 576, 519, 659, 634, 864, 665
Offset: 0

Views

Author

Gus Wiseman, Apr 15 2021

Keywords

Comments

Alternative name: Number of integer partitions of n with no part dividing all the others, but with a part divisible by all the others.

Examples

			The a(18) = 1  through a(23) = 15 partitions (A..E = 10..14):
  633222   C43       C332      C432       C64        E72
           A522      66332     A5222      A552       F53
           C322      633332    C3222      C433       I32
           66322     6332222   663222     C3322      C443
           633322              6333222    663322     C632
           6322222             63222222   6333322    66632
                                          63322222   C3332
                                                     C4322
                                                     663332
                                                     A52222
                                                     C32222
                                                     6333332
                                                     6632222
                                                     63332222
                                                     632222222
		

Crossrefs

The second condition alone gives A130689.
The half-opposite versions are A130714 and A343342.
The first condition alone gives A338470.
The Heinz numbers of these partitions are 1 and A343339.
The opposite version is A343345.
The strict case is A343380.
A000009 counts strict partitions.
A000041 counts partitions.
A000070 counts partitions with a selected part.
A006128 counts partitions with a selected position.
A015723 counts strict partitions with a selected part.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],#=={}||!And@@IntegerQ/@(#/Min@@#)&&And@@IntegerQ/@(Max@@#/#)&]],{n,0,30}]

A343339 Numbers with no prime index dividing all the other prime indices, but with a prime index divisible by all the other prime indices.

Original entry on oeis.org

195, 555, 585, 915, 957, 975, 1295, 1335, 1665, 1695, 1755, 2193, 2265, 2343, 2535, 2585, 2715, 2745, 2775, 2871, 2925, 3115, 3345, 3367, 3729, 3765, 3885, 4005, 4209, 4215, 4575, 4755, 4875, 4995, 5085, 5265, 5285, 5385, 5457, 5467, 5709, 5955, 6205, 6215
Offset: 1

Views

Author

Gus Wiseman, Apr 15 2021

Keywords

Comments

Alternative name: Numbers > 1 whose smallest prime index does not divide all the other prime indices, but whose greatest prime index is divisible by all the other prime indices.
A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.
Also Heinz numbers of partitions with greatest part divisible by all the others, but smallest part not dividing all the others (counted by A343344). The Heinz number of a partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k), giving a bijective correspondence between positive integers and integer partitions.

Examples

			The sequence of terms together with their prime indices begins:
     195: {2,3,6}        2585: {3,5,15}       4575: {2,3,3,18}
     555: {2,3,12}       2715: {2,3,42}       4755: {2,3,66}
     585: {2,2,3,6}      2745: {2,2,3,18}     4875: {2,3,3,3,6}
     915: {2,3,18}       2775: {2,3,3,12}     4995: {2,2,2,3,12}
     957: {2,5,10}       2871: {2,2,5,10}     5085: {2,2,3,30}
     975: {2,3,3,6}      2925: {2,2,3,3,6}    5265: {2,2,2,2,3,6}
    1295: {3,4,12}       3115: {3,4,24}       5285: {3,4,36}
    1335: {2,3,24}       3345: {2,3,48}       5385: {2,3,72}
    1665: {2,2,3,12}     3367: {4,6,12}       5457: {2,7,28}
    1695: {2,3,30}       3729: {2,5,30}       5467: {4,5,20}
    1755: {2,2,2,3,6}    3765: {2,3,54}       5709: {2,5,40}
    2193: {2,7,14}       3885: {2,3,4,12}     5955: {2,3,78}
    2265: {2,3,36}       4005: {2,2,3,24}     6205: {3,7,21}
    2343: {2,5,20}       4209: {2,9,18}       6215: {3,5,30}
    2535: {2,3,6,6}      4215: {2,3,60}       6475: {3,3,4,12}
		

Crossrefs

The first condition alone gives A342193.
The second condition alone gives the complement of A343337.
The partitions with these Heinz numbers are counted by A343344.
A000005 counts divisors.
A000070 counts partitions with a selected part.
A056239 adds up prime indices, row sums of A112798.
A067824 counts strict chains of divisors starting with n.
A253249 counts strict chains of divisors.
A339564 counts factorizations with a selected factor.

Programs

  • Mathematica
    Select[Range[2,1000],With[{p=PrimePi/@First/@FactorInteger[#]},And@@IntegerQ/@(Max@@p/p)&&!And@@IntegerQ/@(p/Min@@p)]&]

Formula

Complement of A343337 in A342193.

A339660 Number of strict integer partitions of n with no 1's and a part divisible by all the other parts.

Original entry on oeis.org

1, 0, 1, 1, 1, 1, 2, 1, 2, 2, 2, 2, 4, 1, 3, 3, 3, 3, 5, 2, 5, 5, 4, 5, 7, 3, 5, 6, 5, 5, 9, 4, 7, 6, 6, 9, 11, 6, 9, 10, 9, 10, 12, 6, 11, 12, 10, 12, 16, 9, 15, 16, 12, 14, 18, 14, 16, 18, 14, 15, 22, 11, 16, 20, 13, 21, 23, 15, 21, 24, 21, 21, 31, 14, 24
Offset: 0

Views

Author

Gus Wiseman, Apr 19 2021

Keywords

Comments

Alternative name: Number of strict integer partitions of n with no 1's that are empty or have greatest part divisible by all the other parts.

Examples

			The a(n) partitions for n = 14, 12, 18, 24, 30, 39, 36:
  (14)     (12)    (18)      (24)        (30)        (39)          (36)
  (12,2)   (8,4)   (12,6)    (16,8)      (24,6)      (36,3)        (27,9)
  (8,4,2)  (9,3)   (15,3)    (18,6)      (25,5)      (26,13)       (30,6)
           (10,2)  (16,2)    (20,4)      (27,3)      (27,9,3)      (32,4)
                   (12,4,2)  (21,3)      (28,2)      (28,7,4)      (33,3)
                             (22,2)      (20,10)     (30,6,3)      (34,2)
                             (12,6,4,2)  (18,9,3)    (24,12,3)     (24,12)
                                         (24,4,2)    (24,8,4,3)    (24,8,4)
                                         (16,8,4,2)  (20,10,5,4)   (18,9,6,3)
                                                     (24,6,4,3,2)  (24,6,4,2)
                                                                   (20,10,4,2)
		

Crossrefs

The dual version is A098965 (non-strict: A083711).
The non-strict version is A339619 (Heinz numbers: complement of A343337).
The version with 1's allowed is A343347 (non-strict: A130689).
The case without a part dividing all the other parts is A343380.
A000009 counts strict partitions.
A000070 counts partitions with a selected part.
A015723 counts strict partitions with a selected part.
A018818 counts partitions into divisors (strict: A033630).
A167865 counts strict chains of divisors > 1 summing to n.

Programs

  • Mathematica
    Table[If[n==0,1,Length[Select[IntegerPartitions[n],FreeQ[#,1]&&UnsameQ@@#&&And@@IntegerQ/@(Max@@#/#)&]]],{n,0,30}]
Showing 1-10 of 10 results.