Jump to content

replace-map Question


Recommended Posts

Dear All,

 

I´m doing some melodic permutations and I have a question about replace-map:

Here are four elements permutations, generated by:

(permute '(1 2 3 4))
(setf permut4 '((1 2 3 4) (1 2 4 3) (1 3 2 4) (1 3 4 2) (1 4 2 3)
                (1 4 3 2) (2 1 3 4) (2 1 4 3) (2 3 1 4) (2 3 4 1)
                (2 4 1 3) (2 4 3 1) (3 1 2 4) (3 1 4 2) (3 2 1 4)
                (3 2 4 1) (3 4 1 2) (3 4 2 1) (4 1 2 3) (4 1 3 2)
                (4 2 1 3) (4 2 3 1) (4 3 1 2) (4 3 2 1)))

Here are the pitch material to be permutated:

(setf permutcontent '((1 cs4) (2 d4) (3 e4) (4 g4)))

I used the REPLACE MAP FUNCTION, like this:

(replace-map permutcontent permut4)

 

THE RESULT:

((c4 d4 e4 g4) (c4 d4 g4 e4) (c4 e4 d4 g4) (c4 e4 g4 d4) (c4 g4 d4 e4)
 (c4 g4 e4 d4) (d4 c4 e4 g4) (d4 c4 g4 e4) (d4 e4 c4 g4) (d4 e4 g4 c4)
 (d4 g4 c4 e4) (d4 g4 e4 c4) (e4 c4 d4 g4) (e4 c4 g4 d4) (e4 d4 c4 g4)
 (e4 d4 g4 c4) (e4 g4 c4 d4) (e4 g4 d4 c4) (g4 c4 d4 e4) (g4 c4 e4 d4)
 (g4 d4 c4 e4) (g4 d4 e4 c4) (g4 e4 c4 d4) (g4 e4 d4 c4))

 

THE QUESTION:

What if I want to replace one item (like a pitch) for a list of melodic pitches ?

How to proceed ?

 

For example:

Instead of substitute a C4 for the number 1, I want to substitute a list of notes, like (cs4 ds4)

(setf permutcontent '((1 cs4 ds4) (2 d4) (3 e4) (4 g4)))

 

When I set this, a get only the cs4 permeated...

 

Best,

Julio

 

I got it !

 

All the material must have the same number of elements, like

(setf permutcontent '((1 (c4 cs4)) (2 (b4 ds4)) (3 (c5 f4)) (4 (cs5 ds4))))

 

Resulting in:

((c4 cs4) (b4 ds4) (c5 f4) (cs5 ds4))
((c4 cs4) (b4 ds4) (cs5 ds4) (c5 f4))
((c4 cs4) (c5 f4) (b4 ds4) (cs5 ds4))
((c4 cs4) (c5 f4) (cs5 ds4) (b4 ds4))
((c4 cs4) (cs5 ds4) (b4 ds4) (c5 f4))
((c4 cs4) (cs5 ds4) (c5 f4) (b4 ds4))
((b4 ds4) (c4 cs4) (c5 f4) (cs5 ds4))
((b4 ds4) (c4 cs4) (cs5 ds4) (c5 f4))
((b4 ds4) (c5 f4) (c4 cs4) (cs5 ds4))
((b4 ds4) (c5 f4) (cs5 ds4) (c4 cs4))
((b4 ds4) (cs5 ds4) (c4 cs4) (c5 f4))
((b4 ds4) (cs5 ds4) (c5 f4) (c4 cs4))
((c5 f4) (c4 cs4) (b4 ds4) (cs5 ds4))
((c5 f4) (c4 cs4) (cs5 ds4) (b4 ds4))
((c5 f4) (b4 ds4) (c4 cs4) (cs5 ds4))
((c5 f4) (b4 ds4) (cs5 ds4) (c4 cs4))
((c5 f4) (cs5 ds4) (c4 cs4) (b4 ds4))
((c5 f4) (cs5 ds4) (b4 ds4) (c4 cs4))
((cs5 ds4) (c4 cs4) (b4 ds4) (c5 f4))
((cs5 ds4) (c4 cs4) (c5 f4) (b4 ds4))
((cs5 ds4) (b4 ds4) (c4 cs4) (c5 f4))
((cs5 ds4) (b4 ds4) (c5 f4) (c4 cs4))
((cs5 ds4) (c5 f4) (c4 cs4) (b4 ds4))
((cs5 ds4) (c5 f4) (b4 ds4) (c4 cs4)))

 

But would be nice to MIX different number of elements...

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...

Important Information

Terms of Use Privacy Policy