FUNCTION:  partitions[PRR] - number of Rogers-Ramanujan partitions
 
CALLING SEQUENCE:  PRR(n)
 
PARAMETERS:    n - positive integer
                   -  
 
SYNOPSIS:  
   Computes the number of ptns of n in which difference between parts
   is at least 2.
                    
EXAMPLES:  
                    
> with(qseries):
> with(partitions):
> with(qseries):
> PRR(9);
                                       5

> JP:=JAC(0,5,infinity)/JAC(1,5,infinity):
> series(jac2series(JP,20),q,11);
            2    3      4      5      6      7      8      9      10      11
   1 + q + q  + q  + 2 q  + 2 q  + 3 q  + 3 q  + 4 q  + 5 q  + 6 q   + O(q  )

DISCUSSION:  
  Number of Rogers-Ramanujan partitions of 9 is 5
                    
SEE ALSO: ptnRR