मार्कोव चेन बीटबॉक्स जेनरेटर

Question

बस एक विचार मेरे पास दूसरे दिन था: पूर्वनिर्धारित ध्वनियों के मार्कोव श्रृंखला के बाद बीट्स बनाना ।

मुझे याद है कि किसी ने Google अनुवाद और जर्मन भाषा के साथ बीटबॉक्स किया था ( लिंक का पालन करें और सुनो)।

तो, चुनौती यह है कि किसी दिए गए श्रृंखला से Google अनुवाद के लिए एक पाठ इनपुट का निर्माण किया जाए। या आप संगीत नोट्स का उपयोग कर सकते हैं और इसे स्वयं खेल सकते हैं :)।

आप बीट की संख्या के साथ एक लाइन पढ़ने वाले एक कार्यक्रम बना सकते हैं, उनके नाम के साथ एक और संभावनाओं का मैट्रिक्स प्रतिनिधित्व (आप प्रतिनिधित्व चुन सकते हैं)।

आप उन तीन तर्कों के साथ एक फ़ंक्शन भी बना सकते हैं।

उदाहरण के लिए

[इनपुट]

20
pv zk bschk kkkk
[[.1, .4, .5, 0.],
 [.3, .2, .3, .2],
 [0., .3, .2, .5],
 [.1, .8, .1, 0.]]

[उत्पादन] कुछ इस तरह:

pv zk bschk zk pv bschk zk pv zk bschk kkkk pv bschk zk bschk bschk bschk zk kkkk bschk

प्रत्येक बीट के लिए शुरुआती संभावना समान है।

यह एक कोड-गोल्फ चुनौती नहीं है क्योंकि मैं कुछ अच्छे समाधान देखना चाहता हूं (रचनात्मक हो)।

यदि आप नई बीट का आविष्कार करते हैं और / या अधिक समय के लिए अच्छा बीट्स देते हैं तो संभावनाओं की तालिका चुनें।

यदि आप चाहें, तो आप असली बीट्स का उपयोग कर सकते हैं (कई भाषाओं में यह .wavफ़ाइलों को खोलना आसान है , जैसे waveपायथन में मॉड्यूल) और संगीत उत्पन्न करते हैं! यहाँ कुछ नि: शुल्क नमूने बीट्स हैं।

यदि आवश्यक हो तो मैं एक संदर्भ कार्यान्वयन पोस्ट कर सकता हूं।

Comments

क्या आप मैट्रिक्स के पूर्वप्रक्रमित रूपों की अनुमति देते हैं? अर्थात् एक ऐसा रूप जिसमें संख्याएँ अधिक नहीं होती हैं?

— हंस-पीटर स्टॉपर

@ ह्स्तोएरे हाँ। यदि आप चाहते हैं, तो आप इसे फ़ंक्शन तर्क के रूप में रख सकते हैं

— जेबर्नार्डो

कृपया हमारे रैंडम .WAVs साझा करने के लिए एक फ़ाइल होस्टिंग का सुझाव दें:

— डॉ। बिसरिसेर

@ सबिसिसरियस मुझे पता है कि सोंगक्लाउड उसके लिए अच्छा है, लेकिन आप किसी भी फाइल होस्टिंग का उपयोग कर सकते हैं।

— जेबरनार्डो

क्या मॉडल में कई-नोट उपसर्गों का उपयोग करना स्वीकार्य होगा?

— स्पर्म

Answer 1

मैंने ये ट्रैक बनाए:

http://soundcloud.com/belisarius/sets/golf-music

निम्नलिखित संक्रमण मैट्रिक्स का उपयोग करना:

{{10,  1,  3/2, 2},  
 {1/2, 10, 3/2, 2},  
 {1/2, 1,  10,  2},  
 {1/2, 1,  3/2, 10}} 

और गणितज्ञ में निम्नलिखित कार्यक्रम:

musicGen[n_, notes_, transMatrix_] :=
 Module[{
          im := IdentityMatrix[Length@notes],
          a  := Array[2^(# - 1) &, Length@notes],
          soundLength = .1  n,
          which
          },
  which[x_] := Position[x, 1][[1, 1]];
  Sound[Join[
    (SoundNote /@ notes[[
        which[#] & /@
         NestList[
          RandomChoice[transMatrix[[which@#]] -> im] &,
          RandomChoice@im,
          n - 1]
        ]]
     )
    ],
   soundLength]
  ]
tm = {{10, 1, 3/2, 2}, {1/2, 10, 3/2, 2}, {1/2, 1, 10, 2}, {1/2, 1, 3/2, 10}}
notesSet = {"Snare", {"Slap", "Shaker"}, {"OpenTriangle", "Maracas"}, "RideBell"};
m = Array[If[#2 == 5 || #2 == #1, 10, #2/2] &, {Length@notesSet,Length@notesSet}];
mg = musicGen[100, notesSet, tm]

Comments

ओह अच्छा। मैंने कुछ आवाज़ें भी करने की कोशिश की, लेकिन मुझे लगता है कि मेरे द्वारा इस्तेमाल की जाने वाली बीट्स में कुछ गड़बड़ थी (उनके बीच कुछ खामोशी थी)।

— जेबरनार्डो

ऐसा लग रहा है कि आप

— जेबरनार्डो

@JBernardo नमूने में चार "chords" हैं: 1) "Snare", 2) {"Slap" & "Shaker"}, 3) {"OpenTriangle" और "Maracas"}, 4) "RideBell"; वह सुपरपोजिशन है जो आप वहां सुनते हैं

— डॉ। बेलिसरियस

Answer 2

जर्मन होने के नाते, हम अपनी भाषा के इस रचनात्मक दुरुपयोग पर हंसते हुए अपनी कुर्सी से लगभग गिर रहे थे। :-)

यहाँ कुछ स्काला है। मैं उन मानचित्रों में संभावनाओं को एन्कोडिंग कर रहा हूं, जो बीट को उत्तराधिकारी बीट्स की एक सूची में मैप करते हैं, जिसमें बीट्स उनकी संभावना के अनुपात में आवृत्ति के साथ होते हैं। बीट्स की एक अनन्त आलसी मूल्यांकन स्ट्रीम बनाई जाती है, जिसकी पहली 10 बीट्स को पहले आउटपुट बीट की उपयुक्त यादृच्छिकता प्राप्त करने के लिए छोड़ दिया जाता है। हम उस स्ट्रीम की शुरुआत से उपयुक्त संख्या में बीट्स लौटाते हैं। मैं छोटा और सामान्य होने के लिए टाइप पैरामीटर टी का उपयोग करता हूं।

def markovChain[T](length : Int, nodes : Seq[T], probabilities : Map[T, Seq[T]]) : Seq[T] = {
  def randomElement(seq : Seq[T]) = seq(Random.nextInt(seq.length))
  def chain(node: T): Stream[T] =
    Stream.cons(node, chain(randomElement(probabilities(node))))
  return chain(randomElement(nodes)) drop(10) take(length)
}

जिसे इस तरह कहा जा सकता है:

val nodes = List("pv", "zk", "bschk", "kkkk")

val probabilities = Map(
  "pv" -> List("pv", "zk", "zk", "zk", "zk", "bschk", "bschk", "bschk", "bschk", "bschk"),
  "zk" -> List("pv", "pv", "pv", "zk", "zk", "bschk", "bschk", "bschk", "kkkk", "kkkk") ,
  "bschk" -> List("zk", "zk", "zk", "bschk", "bschk", "kkkk", "kkkk", "kkkk", "kkkk", "kkkk"),
  "kkkk" -> List("pv", "zk", "zk", "zk", "zk", "zk", "zk", "zk", "zk", "bschk"))

markovChain(20, nodes, probabilities) foreach (s => print (s + " "))

Answer 3

मैंने एक जावास्क्रिप्ट फ़ंक्शन लिखा। हालाँकि, इसने खुद ही बीटबॉक्सिंग शुरू कर दी है ...

function bschk(jk,pv,kkkk){jkjk='pv jk bschk kkkk'.split(' ');boom='indexOf';eval(
function(jkpv){for(pvpv=0,bschkpv='';pvpv<jkpv.length;jkpvpv=jkpv[pvpv++].split(' '),
bschkpv+=String.fromCharCode(jkjk[boom](jkpvpv[0])+jkjk[boom](jkpvpv[1])*4+jkjk[
boom](jkpvpv[2])*16+jkjk[boom](jkpvpv[3])*64));return bschkpv}((
'bschk jk bschk jk  kkkk kkkk bschk jk  bschk pv kkkk jk  pv bschk bschk pv  bschk '
+'jk kkkk jk  jk pv bschk jk  bschk pv kkkk jk  pv pv bschk pv  jk jk bschk jk  jk '
+'kkkk kkkk pv  bschk kkkk kkkk jk  bschk kkkk kkkk jk  pv bschk bschk pv  jk kkkk '
+'pv jk  jk pv bschk jk  pv jk kkkk jk  pv bschk bschk jk  bschk kkkk bschk pv  bsc'
+'hk pv kkkk jk  jk pv bschk jk  bschk kkkk bschk jk  pv jk bschk jk  kkkk kkkk bsc'
+'hk jk  jk kkkk bschk jk  pv bschk bschk pv  jk bschk bschk pv  bschk bschk bschk '
+'pv  pv pv kkkk jk  bschk jk kkkk jk  bschk kkkk bschk pv  pv kkkk bschk jk  jk jk'
+' bschk jk  bschk kkkk bschk jk  kkkk jk bschk jk  pv jk kkkk jk  pv bschk bschk j'
+'k  jk bschk bschk pv  pv kkkk bschk pv  jk bschk bschk jk  jk kkkk kkkk pv  pv pv'
+' kkkk pv  pv kkkk bschk pv  bschk jk bschk jk  pv kkkk bschk pv  kkkk jk bschk jk'
+'  pv kkkk bschk pv  kkkk pv bschk jk  kkkk bschk bschk jk  kkkk pv bschk jk  kkkk'
+' bschk bschk jk  bschk pv bschk jk  kkkk kkkk bschk jk  kkkk kkkk bschk jk  jk kk'
+'kk bschk jk  jk kkkk kkkk pv  kkkk jk bschk pv  kkkk jk bschk pv  kkkk bschk kkkk'
+' pv  jk bschk bschk jk  pv kkkk kkkk pv  bschk bschk bschk jk  kkkk bschk bschk j'
+'k  kkkk bschk kkkk pv  jk bschk bschk jk  kkkk bschk bschk pv  kkkk bschk bschk p'
+'v  jk bschk bschk pv  kkkk bschk kkkk jk  kkkk pv bschk jk  kkkk bschk bschk jk  '
+'kkkk pv bschk jk  kkkk bschk bschk jk  bschk pv bschk jk  kkkk kkkk bschk jk  kkk'
+'k kkkk bschk jk  jk kkkk bschk jk  kkkk bschk bschk pv  jk kkkk kkkk pv  pv pv kk'
+'kk jk  bschk jk kkkk jk  kkkk bschk jk jk  jk jk bschk jk  jk kkkk jk jk  kkkk bs'
+'chk bschk pv  kkkk jk bschk pv  pv pv bschk pv  kkkk jk bschk pv  kkkk bschk kkkk'
+' pv  kkkk jk bschk jk  jk kkkk kkkk pv  jk kkkk pv jk  jk pv bschk jk  pv jk kkkk'
+' jk  pv bschk bschk jk  bschk kkkk bschk pv  bschk pv kkkk jk  jk pv bschk jk  bs'
+'chk kkkk bschk jk  pv jk bschk jk  kkkk kkkk bschk jk  jk kkkk bschk jk  pv bschk'
+' bschk pv  jk bschk bschk pv  kkkk bschk kkkk pv  bschk jk bschk jk  jk kkkk kkkk'
+' pv  jk kkkk bschk pv  jk pv kkkk pv  kkkk bschk kkkk pv  kkkk jk kkkk jk  pv bsc'
+'hk bschk jk  jk bschk bschk jk  pv kkkk bschk jk  jk jk bschk jk  pv bschk bschk '
+'pv  kkkk jk bschk jk  bschk kkkk kkkk pv  jk kkkk kkkk pv  pv pv kkkk pv  jk bsch'
+'k bschk pv  kkkk jk bschk jk  jk kkkk bschk pv  jk kkkk kkkk pv  kkkk bschk bschk'
+' jk  kkkk bschk bschk jk  kkkk bschk bschk jk  kkkk bschk bschk jk  kkkk bschk jk'
+' jk  jk jk bschk jk  jk kkkk jk jk  kkkk bschk jk jk  kkkk bschk bschk pv  kkkk b'
+'schk bschk pv  bschk jk bschk jk  jk kkkk jk jk  kkkk bschk kkkk pv  jk jk bschk '
+'jk  jk kkkk kkkk pv  bschk jk bschk jk  kkkk bschk kkkk pv  jk kkkk kkkk jk').split
('  ')));return ckckboom;}

उपयोग उदाहरण: bschk(20,'pv jk bschk kkkk'.split(' '),[[.1,.4,.5,0],[.3,.2,.3,.2],[0,.3,.2,.5],[.1,.8,.1,0]])

Answer 4

पायथन में सिर्फ एक संदर्भ कार्यान्वयन:

from random import random

def find(num, pdf):
    ''' Find position of number in CDF from PDF (must sum 100%) '''
    cdf = (sum(pdf[:i+1]) for i in range(len(pdf)))
    for i,j in enumerate(cdf):
        if num < j:
            return i

def build(t, beats, table):
    node = int(random()*len(table))
    nodes = [node]
    for i in range(t-1):
        node = find(random(), table[node])
        nodes.append(node)
    return ' '.join(beats[i] for i in nodes)

और एक परीक्षण कार्यक्रम:

table = [[.1, .4, .5, 0.],
         [.3, .2, .3, .2],
         [0., .3, .2, .5],
         [.1, .8, .1, 0.]]

print(build(20, 'pv zk bschk kkkk'.split(), table))

और कुछ आउटपुट:

pv zk bschk zk kkkk zk bschk kkkk zk zk zk bschk kkkk zk bschk zk pv bschk kkkk zk
zk bschk kkkk zk zk kkkk zk bschk kkkk zk bschk zk pv zk pv zk zk bschk kkkk bschk
kkkk zk zk pv bschk bschk zk zk kkkk zk kkkk zk zk kkkk zk pv zk bschk kkkk zk

लेकिन उनमें से कोई भी बहुत अच्छा बीटबॉक्स नहीं बनाता है क्योंकि बहुत ज्यादा है kkkk:)।