アルバム「A​*​B​*​C​*​D​*​E」制作ノート

ラ・シ・ド・レ・ミの5つの音 (a,b,c,d,e) を使って作ることができる 3125個の組み合わ せ音列を演奏させてみた作品。 aaaaa ~ eeeea、 aaaab ~ eeeeb、 aaaac ~ eeeec、 aaaad ~ eeeed、 aaaae ~ eeeee の5曲と全曲を演奏させた全部で6曲で構成。 1~5はシンセ音源 (Prism)、6 はピアノ音源を使って録音しました。

[生成アルゴリズム ]

R の関数 expand grid() を使って音の組み合わせを生成しました。 拍子は 5/16 に設定。

[プログラム ] (RScript+cSakura)

rscript --vanilla -e "s=c('a','b','c','d','e');exg=expand.grid(s,s,s,s,s);cat('System.TimeSignature=5,16 l16\n');for(i in 1:nrow(exg)){cat(paste(exg[i,1],exg[i,2],exg[i,3],exg[i,4],exg[i,5],sep=''),sep='\n')}" > abcde.mml
csakura -p abcde.mml > nul

[アートワーク ]

5 つの音(a,b,c,d,e) の 3125 個の組み合わせを色に対応させたグラフを [R] で作り、これをそのまま使ってみました。

scl=c("a","b","c","d","e")
exg=expand.grid(scl,scl,scl,scl,scl)
df=data.frame(x=rep((1:length(scl)),nrow(exg)),y=rep(1:nrow(exg),each=length(scl)),note=as.vector(t(exg)))
g=qplot(x,y,fill=note,data=df,geom="tile")+scale_fill_manual(values=c(cpal(5)[1],cpal(5)[2],cpal(5)[3],cpal(5)[4],cpal(5)[5]))
plot(g)

この記事が気に入ったらサポートをしてみませんか?