Hi,
first setWavPlayer() expects an UNIX shell command. To open it with
e.g. QuickTime one should use this:
setWavPlayer('open -a \"QuickTime Player.app\"')
[Ignore the error message]
Then the tricky point is that QuickTime cannot open temp files written
by the play() function (?maybe access rights; or the sound lib is
written with Windows-like paths?)
Thus I wrote my own play() function
myplay <- function(s, ...) {
f <- paste(tempdir(), "/Temp_Sound.wav", sep='')
if (file.exists(f)) {file.remove(f)}
saveSample(s, f)
play(f, ...)
}
Now if I invoke myplay(s) QuickTime opens that temp file and I can
press SPACE to play. If you want to play the sound automatically you
can set this in QuickTime's preferences 'Automatically play movies
when opened'
Other possibilities would be:
- look for a command line program for Leopard which can play wav files
- write an AppleScript script which takes the argument to open/play it
with QuickTime; save that script and set setWavPlayer('osascript /PATH/
TO/SCRIPT')
--Hans
_______________________________________________
R-SIG-Mac mailing list
[email protected]
https://stat.ethz.ch/mailman/listinfo/r-sig-mac
