http://comcat.cr.usgs.gov/fdsnws/event/1/ not working

[Hrishi1909]

Hey just trying to implement it but found out this :- http://comcat.cr.usgs.gov/fdsnws/event/1/ is not working ? any idea why?

[emartinez-usgs]

Hi @Hrishi1909 -

Please try using this URL: https://earthquake.usgs.gov/fdsnws/event/1/

[Hrishi1909]

this link works but the it gives this error . any idea why? Error in scan(datarequests[1], list(time = "", latitude = 0, longitude = 0,
scan() expected 'a real', got 'reviewed'

this is my code source("searchcomcat.R") #comcatdata <- comcathypocsv() comcatdata <- comcathypocsv(minmagnitude=3)

[emartinez-usgs]

@mhearne-usgs any ideas?

[aglogowski]

I simply make alternate for scan function in line 198
data <-read.csv(datarequests[1]) #data <- scan(datarequests[1],list(time="",latitude=0,longitude=0,depth=0,mag=0,magtype="",nst=0,gap=0,dmin=0,rms=0,net="",id="",updated="",place="",type=""),sep=",",quote="\"",skip=1,quiet=TRUE)
and line 202
data2 <-read.csv(datarequests[i]) #data2 <- scan(datarequests[i],list(time="",latitude=0,longitude=0,depth=0,mag=0,magtype="",nst=0,gap=0,dmin=0,rms=0,net="",id="",updated="",place="",type=""),sep=",",quote="\"",skip=1,quiet=TRUE)
Now the file works well on a first look