fileAddress <- system.file('extdata/processed/p1_DipolDipol_SW-NE.xyz',
package = 'geoelectrics')
processedData = new('ProcessedData')
processedData@address = fileAddress
processedData@points <- parseProcessedDataFile(address = fileAddress)[[1]]
processedData@pointsWithTopo <- parseProcessedDataFile(address = fileAddress)[[2]]
Run the code above in your browser using DataLab