library("tuneR")
library("R.matlab")

# setWavPlayer("audacious") # Linux (needs audacious),

speech <- R.matlab::readMat("speech.mat")

x <- as.numeric(speech[["x"]])

play(Wave(x, samp.rate = 8000))