The source of the data used in these graphs originates from a 2005 paper titled Oscillatory modes of extended Nile River records (A.D. 622–1922) authors D. Kondrashov, Y. Feliks, and M. Ghil. The paper is found at this link https://doi.org/10.1029/2004GL022156

Nile <- read.csv("Nile.csv")
Nile[, 2:4][Nile[, 2:4] == 0] <- NA
NileHigh <- Nile$High.Flow
NileHigh %>% ts(freq=1,start=622) -> NileHigh_ts

Nile High Flow

NileHigh_ts %>% dygraph(width=775,height=400, main = "Plot of High Flow in the Nile (622-1921)", xlab = "Years 622-1921", ylab = "Measurement of the River Nile") %>% dyRangeSelector