R脚本语音提醒

给R脚本增加语音提醒功能

没有for循环，一套代码一套代码run，累成狗

有了for循环，盯着屏幕等下一步，累成傻狗。

要是有那么一种方法，能在脚本运行结束语音提醒一下，就可以腾出眼睛、脑子、手、脚。。。以至于整个人，安心躺在床上刷手机学习了。

实现方式：

以下以ubuntu系统作为示例

下载免费语音提示音，类似于嗖~ 呼~ 咳咳~之类的。网上找“免费语音提示音”，会有很多的。

存在某个你觉得可以的路径下

我存在了/home/my/Music 并给音乐取名为success

在R脚本的最后键入

system("paplay /home/my/Music/success.wav")

这是不需要安装包的，是系统自带的。

语法结构为
system(“paplay+空格+路径+文件名”)

有时候发现这条命令不能执行，可能的原因是系统没有启动PulseAudio服务

到ubuntu终端启动PulseAudio服务：

pulseaudio --start

再次运行脚本就可以了。

---

更新2023-7-10

通过R启动系统播放音乐，时常不知道什么原因就失败了。

可以使用 tuneR 包，这个包是用来处理音频的，可以处理MP3，wav，flac三种格式。亲测播放MP3不完整，但是能有声音。是不是wav格式播放能好一些，但是找了半天，wav格式都是付费的，因为所以。。。。

tuneR包教程

library(tuneR)
play("C:\\Users\\mycomputer\\Music\\news.mp3")

加载这个R包，play（） 音乐地址+名称就行。代码比较简洁。