as.ts.mpsth.Rd
Convert a multi-psth list into a (multi) time series object
# S3 method for mpsth as.ts(x, ...)
x | multi-psth list |
---|---|
... | ignored |
time series or multi-time series object
data(CAL1V,package='STAR') CAL1V <- lapply(CAL1V,as.repeatedTrain) psth1 <- psth(CAL1V[["neuron 1"]],breaks=c(bw=0.5,step=0.05),plot=FALSE) psth2 <- psth(CAL1V[["neuron 2"]],breaks=c(bw=1,step=0.1),plot=FALSE) z=as.ts(as.mpsth(list(psth1,psth2))) plot(z,plot.type='single',col=1:2,ylab='Frequency /Hz')