system.file("extdata","run1_Hydrographs.csv", package="RavenR") %>%
rvn_hyd_read(., tzone="EST") -> mydata
mydata <- mydata$hyd$precip
mydata<-mydata[-seq(2,nrow(mydata),3),] # remove every 3rd day
head(mydata)
# fill back with rvn_ts_infill using NA values
rvn_ts_infill(mydata$precip) %>%
head()
Run the code above in your browser using DataLab