3
私は住所が存在するかどうかをチェックするために簡単なコードを記述しようとしている内に存在するかどうか:チェックは、住所は、R
を私の最初の試みで、私は書き込みアドレスを入れて、それが私に正しいアドレスを与える:
addr <- '2147 Newhall Street,Santa Clara,CA 95050'
url = paste('http://maps.google.com/maps/api/geocode/xml?address=', addr,'&sensor=false',sep='')
doc = xmlTreeParse(url)
root = xmlRoot(doc)
lat = xmlValue(root[['result']][['geometry']][['location']][['lat']])
long = xmlValue(root[['result']][['geometry']][['location']][['lng']])
lat
"37.3386004"
long
"-121.9405759"
しかし、私は間違った住所を書く場合、それはまだ私に座標を与えている:
addr <- 'xyz,Santa Clara,CA 95050' # set your address here
url = paste('http://maps.google.com/maps/api/geocode/xml?address=', addr,'&sensor=false',sep='')
doc = xmlTreeParse(url)
root = xmlRoot(doc)
lat = xmlValue(root[['result']][['geometry']][['location']][['lat']])
long = xmlValue(root[['result']][['geometry']][['location']][['lng']])
lat
"37.3539663"
long
"-121.9529992"
私は上記の通りのアドレスが存在しないと確信しているが、私はまだいくつかの座標を取得しています。有効な住所がない場合は、NA値または何らかの旗を返すことができますか?
わかりました。次に、loctypeが近似値であるかどうかをチェックするための条件を書くことができます。 – anonymous