OFFSET
1,2
LINKS
Wouter Meeussen, Table of n, a(n) for n = 1..207
EXAMPLE
For i=5, the partitions of i are 5, 41, 32, 311, 221, 2111, 11111.
The partitions without repetition are at position 1,2 and 3, corresponding to the first three terms of the sequence.
For i=10, the partitions of i begin 10, 91, 82, 811, 73, 721, 7111, 64, 631, 622, ...
The partitions without repetition are at position 1,2,3,5,6,8,9, ...
MATHEMATICA
it=Table[Flatten[Position[IntegerPartitions[n], q_List/; Sort[q]==Union[q] , 1]], {n, 36, 36+2, 2}];
{{diffat}}=Position[Take[Last[it], Length[First[it] ] ] - First[it] , a_ /; (a!=0), 1, 1]; Take[First[it], diffat -1 ]
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Example and explanations from Olivier Gérard, Feb 13 2011
STATUS
approved