干渉
唸らせる こちらとも関連 三角関数の積として唸らせる L<-10000 cycle<-100000 t<-seq(from=0,to=1,length.out=L)*2*pi*cycle Nstep<-20 w<-runif(Nstep)^(0.01^(1:Nstep))*100 x<-cos(w[1]*t) plot(x,type="l") for(i in 2:Nstep){ r<-runif(1) x<-x*(cos(w…
周期の異なる波を足し合わせると「うなる」(Wiki「うなり」) 等式の右辺(2つの周期関数の積)は、周期的に振幅が変化しつつ、全体も周期的に変化する、という式に読める うなりの幾何学パターンは「モアレ」(Wikiの「モアレ」) 1変数でうならせる w<-10 del…