AddLinesToRasterPlot | R Documentation |
First thing this does is scale waves to 0-1 range using scale.ts Assumes that number of waves and number of boxes (odours) on spike raster plot actually match. It doesn't check!
AddLinesToRasterPlot(waves, ylim, col = "black", ...)
waves |
an mts object |
ylim |
min and max value to plot y axis of wave data (eg voltage) |
col |
vector or function of colours that will be passed to |
... |
additional arguments passed to lines.ts function |
If col is a function then it will be called with the number of waves
PlotRasterFromSweeps
,lines
## Not run:
# First plot the rasters
spikes8=CollectSpikesFromSweeps('/Volumes/JData/JPeople/Shahar/Data/120308/nm20120308c0',8)
spike8_split=split(spikes8)
PlotRasterFromSweeps (spike8_split)
# Now plot the voltages
avgwaves=read.table(
'/Volumes/JData/JPeople/Shahar/Data/120308/nm20120308c0/008_Avg_RG0_A0++.txt',
header=T)
avgwavests=ts(avgwaves,start=0,freq=10)
AddLinesToRasterPlot(avgwavests,col='red')
# same but with rainbow colouring
PlotRasterFromSweeps (spike8_split)
AddLinesToRasterPlot(avgwavests,col='red')
# same but voltage lines underneath spikes
PlotRasterFromSweeps (spike8_split, panel.first=AddLinesToRasterPlot(avgwavests,col='red'))
# same but without spikes or dividers
PlotRasterFromSweeps (spike8_split,PlotSpikes=FALSE,PlotDividers=FALSE)
AddLinesToRasterPlot(avgwavests,col='red')
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.