# NOT RUN {
# Consider you have raw trade data for 1 stock for 2 days
head(sampleTDataRawMicroseconds)
dim(sampleTDataRawMicroseconds)
tDataAfterFirstCleaning <- tradesCleanup(tDataRaw = sampleTDataRaw, exchanges = list("N"))
tDataAfterFirstCleaning$report
dim(tDataAfterFirstCleaning$tData)
#In case you have more data it is advised to use the on-disk functionality
#via "dataSource" and "dataDestination" arguments
# }
Run the code above in your browser using DataLab