# load data
data('S')
wells <- axion.guess.well.number(S$channels)
array <- paste0("Axion ", wells, " well")
plateinfo <- plateinfo(array)
epos <- axion.elec.name.to.xy(S$channels, plateinfo)
##plot(epos)
Run the code above in your browser using DataLab