多语言展示
当前在线:1893今日阅读:176今日分享:34

听一听圆周率π的声音——音符

Mathematica可以发出不同的音符的声音,以及不同的乐器的效果。本文,根据Pi的各位数字(忽略小数点),来制作一段音乐。
工具/原料
1

电脑

2

Mathematica11.2

基础方法
1

中央C音,用0代替:a = Sound[SoundNote[0]]

2

看看这个音符的波形图:AudioPlot[a]

3

Mathematica默认的乐器是钢琴,换成小提琴试试:a = Sound[SoundNote[0, 1, "Violin"]]看起来不一样,听起来就不一样。

4

用小提琴连续演奏0到7的音符:a = Sound[SoundNote[#, 1, "Violin"] & /@ Range[7]]每个音符持续1秒。

5

用钢琴连续演奏0到7的音符:a = Sound[SoundNote[#, 1, "Piano"] & /@ Range[7]]每个音符持续1秒。

Pi的音符

如果把Pi的每一位数字,都当成一个单独的音符,就可以制作成一段无限长的音乐。这里,只截取前10个音符。END

注意事项

用大号和小提琴随机交叉演奏的π的前1000位的音频文件:pan.baidu.com/s/1MblnctWEKATMwRPhZpB22w,大家可以下载试听,哈哈。密码npec。

推荐信息