simple recorder added
spectogram in R