# NOT RUN {
# Consider you have raw quote data for 1 stock for 2 days
head(sampleQDataRawMicroseconds)
dim(sampleQDataRawMicroseconds)
qDataAfterCleaning <- quotesCleanup(qDataRaw = sampleQDataRawMicroseconds, exchanges = "N")
qDataAfterCleaning$report
dim(qDataAfterCleaning$qData)
# 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