readNWISpeak call

sites <- c("02110500", "02130900", "02131110", "02131309","02131320", "02131472", "02131500", "02132000","02132100", "02132500", "02135000")
df <- readNWISpeak(sites)

Error in if (any(nchar(as.character(data$peak_dt)) <= 7) | any(grepl("[0-9]*-[0-9]*-00",  : 
  missing value where TRUE/FALSE needed

The NWIS url is ok. This is happening somewhere inside importRDB1.

To upload designs, you'll need to enable LFS and have an admin enable hashed storage. More information