Please could someone suggest ideas for creating random notes that are played in clusters over random time periods?

One possible way among the infinity of possibility :

 

 

;;; Creating random notes that are played 
;;; in clusters over random time periods

;; Create random notes
(setf notes (rnd-sample 512 (make-scale 'c2 48)))

;; Create chords
(setf chords (gen-chord 24 4 8 -6 6 notes))

;; Create binary time periods
(setf bin (gen-binary-rnd 24 16 1 8))

;; Create rhythm from binary
(setf ry (binary-map bin 's))

;; Create random dynamics
(setf dyn (rnd-sample (length chords) '(pp p mp mf f ff)))
           
;; Full OMN Assembly
(setf rnd-chords (make-omn
                  :pitch chords
                  :length ry
                  :velocity dyn
                  ;:span :pitch
                  ))

(ps 'gm
    :pg (list rnd-chords)
    :tempo 64)

SB.

Thank you, that's a great starting point for me to experiment with.