(
{
    var primes, interval, seq;
    // Define a list of prime numbers
    primes = [2, 3, 5, 7, 11, 13, 17, 19];

    // Use primes to define a rhythmic pattern
    seq = Pseq(primes, inf);  // Repeat indefinitely

    // Trigger a note every prime number of beats
    Pbind(
        \freq, 60.midicps,
        \dur, seq,
        \amp, 0.1
    ).play;
}.fork;
)


(
{
    var primes, pitchSeq, sig;
    primes = [2, 3, 5, 7, 11];  // List of primes
    pitchSeq = Pseq(primes, inf).collect { |prime| 60 + prime };  // Map primes to pitch offsets

    // Create a sequence of pitches based on the primes
    Pbind(
        \freq, pitchSeq.midicps,
        \dur, 0.5,
        \amp, 0.1
    ).play;
}.fork;
)