|
Size: 7501
Comment:
|
Size: 10286
Comment:
|
| Deletions are marked like this. | Additions are marked like this. |
| Line 8: | Line 8: |
| by Marshall Hampton. When the two frequencies are well seperated, we hear the right hand side of the identity. When they start getting close, we hear the higher-pitched factor in the left-hand side modulated by the lower-pitched envelope. {{{ |
by Marshall Hampton. When the two frequencies are well separated, we hear the right hand side of the identity. When they start getting close, we hear the higher-pitched factor in the left-hand side modulated by the lower-pitched envelope. {{{#!sagecell |
| Line 28: | Line 28: |
| def sinsound(freq_ratio = slider(0,1,1/144,1/12)): | def sinsound(freq_ratio = slider(1/144,1,1/144,1/12)): |
| Line 41: | Line 41: |
| html('<embed src="https:./test'+ lab +'.wav" width="200" height="100"></embed>') | html('<embed src="cell://test'+ lab +'.wav" width="200" height="100"></embed>') |
| Line 46: | Line 46: |
| == Karplus-Strong algorithm for plucked and percussive sound generation == by Marshall Hampton {{{#!sagecell import wave class SoundFile: def __init__(self, signal,lab=''): self.file = wave.open('./test' + lab + '.wav', 'wb') self.signal = signal self.sr = 44100 def write(self): self.file.setparams((1, 2, self.sr, 44100*4, 'NONE', 'noncompressed')) self.file.writeframes(self.signal) self.file.close() mypi = float(pi) from math import sin def ks(delay,length,blend = 0,filler=None,stretch=0): if filler == None: filler = [randint(-16383,16383) for q in range(delay+1)] outsig = filler[:] index = len(filler) while len(outsig) < length: s = random() if s > stretch: b = random() if b < 1-blend: newvalue = (outsig[index-delay]+outsig[index-delay-1])*.5 else: newvalue = -(outsig[index-delay]+outsig[index-delay-1])*.5 else: newvalue = outsig[index-delay] outsig.append(newvalue) index += 1 return [int(round(x)) for x in outsig] @interact def sinsound(delay = slider([int(2^i) for i in range(2,10)], default=100, label="initial delay"), blend=slider(srange(0,1,.01,include_endpoint=True),default=0,label="blend factor"), stretch=slider(srange(0,1,.01,include_endpoint=True),default=0,label="stretch factor")): s2f = ks(delay,int(44100*(1/2)),blend=blend,stretch=stretch) for i in range(12): s2f = s2f + ks(int(2^((12+i)/12.0)*delay),int(44100*(1/2)),blend=blend, stretch=stretch) html("Karplus-Strong algorithm with blending and delay stretching") html("<br>K. Karplus and A. Strong, <em>Digital synthesis of plucked string and drum timbres</em>, \nComputer Music Journal 7 (2) (1983), 43–55.<br>") html("Initial waveform:") show(list_plot(s2f[0:2000],plotjoined=True), figsize = [7,3.5]) html("Waveform after stabilization:") show(list_plot(s2f[20000:22000],plotjoined=True), figsize = [7,3.5]) s2str = ''.join(wave.struct.pack('h',x) for x in s2f) lab="" f = SoundFile(s2str,lab=lab) f.write() html('<embed src="cell://test'+ lab +'.wav" width="200" height="100"></embed>') }}} {{attachment:KarplusStrong.png}} |
|
| Line 49: | Line 107: |
| {{{ | {{{#!sagecell |
| Line 105: | Line 163: |
| {{{ | {{{#!sagecell |
| Line 119: | Line 177: |
| {{{ | {{{#!sagecell |
| Line 126: | Line 184: |
| print "<html>" # trick to avoid word wrap | |
| Line 128: | Line 185: |
| cProfile.run(cmd) | cProfile.runctx(cmd,globals(), locals()) |
| Line 130: | Line 187: |
| profile.run(cmd) print "</html>" |
profile.runctx(cmd,globals(), locals()) |
| Line 139: | Line 195: |
| {{{ | {{{#!sagecell |
| Line 150: | Line 206: |
| {{{ | {{{#!sagecell |
| Line 196: | Line 252: |
| by Pablo Angulo {{{ %cython |
by Pablo Angulo, Eviatar Bach {{{#!sagecell %python |
| Line 201: | Line 258: |
def cellular(rule, int N): |
from random import randint def cellular(rule, N, initial='Single-cell'): |
| Line 207: | Line 265: |
| initial: starting condition; can be either single-cell or a random binary row | |
| Line 208: | Line 267: |
| cdef int j,k,l M=zeros( (N,2*N+1), dtype=int) M[0,N]=1 |
M=zeros( (N,2*N+2), dtype=int) if initial=='Single-cell': M[0,N]=1 else: M[0]=[randint(0,1) for a in range(0,2*N+2)] |
| Line 213: | Line 274: |
| for k in range(N-j,N+j+1): | for k in range(0,2*N): |
| Line 216: | Line 277: |
| return M }}} {{{ |
return M[:,:-1] |
| Line 224: | Line 284: |
@interact def _( N=input_box(label='Number of iterations',default=100), |
}}} Put in separate cell: {{{#!sagecell @interact def _( initial=selector(['Single-cell', 'Random'], label='Starting condition'), N=input_box(label='Number of iterations',default=100), |
| Line 228: | Line 290: |
| size = slider(1, 11, step_size=1, default=6 ) ): | size = slider(1, 11, label= 'Size', step_size=1, default=6 ), auto_update=False): |
| Line 230: | Line 292: |
| M = cellular(rule, N) plot_M = matrix_plot(M) |
M = cellular(rule, N, initial) plot_M = matrix_plot(M, cmap='binary') |
| Line 234: | Line 296: |
| {{attachment:cellular.png}} | {{attachment:cellular2.png}} |
Sage Interactions - Miscellaneous
goto interact main page
Contents
Hearing a trigonometric identity
by Marshall Hampton. When the two frequencies are well separated, we hear the right hand side of the identity. When they start getting close, we hear the higher-pitched factor in the left-hand side modulated by the lower-pitched envelope.
Karplus-Strong algorithm for plucked and percussive sound generation
by Marshall Hampton
An Interactive Venn Diagram
Unreadable code
by Igor Tolkov
Profile a snippet of code
Evaluate a bit of code in a given system
by William Stein (there is no way yet to make the text box big):
Minkowski Sum
by Marshall Hampton
Cellular Automata
by Pablo Angulo, Eviatar Bach
Put in separate cell:
