Pass samp.rate to as.EMG() from read.EMG().
Use actual time (s) for plotting EMG signals.
Use ggplot() for plot method.