dataRetrieval query error [RESOLVED]

This worked:

dataAvailable <- whatNWISdata(siteNumber=siteNumbers)

David/Bert,

Mea culpa! The vignette example used a single siteNumber which is also the
variable name and I missed that last point.

Thank you very much.

Regards,

Rich