# NOT RUN {
#Extract the ECA&D data file from the example data folder
path2inptfl<-system.file("extdata", "TX_SOUID132734.txt", package = "INQC")
#Read the data file
x<-readecad(input=path2inptfl,missing= -9999)[,3]
#Find all duplicated dates in the time series
duplas(x)
#Introduce the duplicated dates
x[31]<-'19610130'
#Find all duplicated dates in the time series
duplas(x)
# }
Run the code above in your browser using DataLab