58 lines
1.2 KiB
Text
58 lines
1.2 KiB
Text
class:: HenonN
|
|
summary:: Henon map chaotic generator
|
|
categories:: UGens>Generators>Chaotic
|
|
related:: Classes/HenonL, Classes/HenonC
|
|
|
|
description::
|
|
A non-interpolating sound generator based on the difference equation:
|
|
|
|
teletype::
|
|
x(n+2) = 1 - a * x(n+1)^2 + b * x(n)
|
|
::
|
|
|
|
This equation was discovered by French astronomer Michel Hénon while studying the orbits of stars in globular clusters.
|
|
|
|
sclang code translation:
|
|
|
|
code::
|
|
(
|
|
var a = 1.4, b = 0.3, x0 = 0, x1 = 1, size = 64;
|
|
plot(size.collect { var aux = 1 - (a * (x1 ** 2)) + (b * x0); x0 = x1; x1 = aux; aux });
|
|
)
|
|
::
|
|
|
|
classmethods::
|
|
method:: ar
|
|
argument:: freq
|
|
Iteration frequency in Hertz
|
|
argument:: a
|
|
Equation variable
|
|
argument:: b
|
|
Equation variable
|
|
argument:: x0
|
|
Initial value of x
|
|
argument:: x1
|
|
Second value of x
|
|
argument::mul
|
|
argument::add
|
|
|
|
examples::
|
|
code::
|
|
// default initial params
|
|
{ HenonN.ar(MouseX.kr(20, SampleRate.ir)) * 0.2 }.play(s);
|
|
|
|
// mouse-control of params
|
|
{ HenonN.ar(SampleRate.ir/4, MouseX.kr(1,1.4), MouseY.kr(0,0.3)) * 0.2 }.play(s);
|
|
|
|
// randomly modulate params
|
|
(
|
|
{ HenonN.ar(
|
|
SampleRate.ir/8,
|
|
LFNoise2.kr(1, 0.2, 1.2),
|
|
LFNoise2.kr(1, 0.15, 0.15)
|
|
) * 0.2 }.play(s);
|
|
)
|
|
|
|
// as a frequency control
|
|
{ SinOsc.ar(HenonN.ar(40, MouseX.kr(1,1.4), MouseY.kr(0,0.3))*800+900)*0.4 }.play(s);
|
|
::
|