In tdanker/ephys2: Read, analyze and plot HEKA Patchmaster files

devtools::load_all()
rm(CURSORS)
data(st)
set_cursor(st,"peak", curMax_,c(2.3,2.4))
st$plot()   


set_cursor(st,"peak", curMax_,c(2.1,2.7), 
           plot.fun.first = make_panel.first("grey70", "grey100", style=1, ex=.061))
set_cursor(st,"base", curMean_,c(.01,0.2), 
           plot.fun.first = make_panel.first("red", "grey100", style=1, ex=.05))

st$plot()
st$plot(axes=F, ylab="", xlab="", ylim=c(-.2,1)); scalebar(y = .2)