【修正しました】Rを用いて、住所から緯度経度を抽出する。

Question

解決したいこと

Ｒを用いて、住所から緯度経度情報を取得することを行っています。住所と緯度経度データは国土交通省から提供されているデータ（大阪府）をcsv形式で保存しています。住所入力をすることで、緯度列、経度列のデータを抽出したいのですが、実際にコードを書いてみるとNA NA NAとなり、緯度経度が抽出できませんでした。
どのように改善すれば、適切にデータを抽出できるでしょうか。
→解決しました！

コードと結果

x<-read.csv("C://27_2019.csv")
head(x,3)

都道府県名 市区町村名 大字.丁目名 小字.通称名 街区符号.地番 座標系番号 Ｘ座標 Ｙ座標 緯度 経度 住居表示フラグ 代表フラグ 更新前履歴フラグ
1 大阪府 大阪市都島区 毛馬町三丁目 8 6 -141814.1 -44144.5 34.72071 135.5180 1 1 0
2 大阪府 大阪市都島区 毛馬町三丁目 7 6 -141711.3 -44137.4 34.72163 135.5181 1 1 0
3 大阪府 大阪市都島区 毛馬町三丁目 7 6 -141756.2 -44139.3 34.72123 135.5181 1 0 0
更新後履歴フラグ
1 0
2 0
3 0

y<-apply(x,1,function(xx){paste(xx,collapse = "")})
head(y,3)

[1] "大阪府大阪市都島区毛馬町三丁目86-141814.1-44144.534.72071135.51801100" "大阪府大阪市都島区毛馬町三丁目76-141711.3-44137.434.72163135.51811100"
[3] "大阪府大阪市都島区毛馬町三丁目76-141756.2-44139.334.72123135.51811000"

target<-"大阪府大阪市都島区毛馬町三丁目8"
xnum<-pmatch(target,y)
target<-"大阪府大阪市都島区毛馬町三丁目8"
pmatch(target,y)

[1] 1

xnum<-pmatch(target,y)
z<-x[xnum,9:10]
z

  緯度    経度

1 34.72071 135.518

以上です。

Comments

[CHERRY]

> 大阪市津島区

大阪市に 津島区 は存在しないので、NA ということはないでしょうか？

おそらく　毛馬町　なら　都島区　ですね。

[haruake]

改めて修正して実行しなおしましたらうまくいきました。
ありがとうござました。

Answer 1

おそらくyが期待したとおりの形になっていません。

多分こんな感じで。

y <- apply(x, 1, function(xx){paste(xx, collapse="")})

Comments

[haruake]

コメントありがとうございます。
ｙのコードを修正してみましたが、どうしてもＮＡで返ってきてしまいました。
x<-read.csv("C://27_2019.csv")
y <- apply(x, 1, function(xx){paste(xx, collapse="")})
target<-"大阪府大阪市津島区毛馬町三丁目8"
xnum<-pmatch(target,y)
[1] NA
となり、この時点でpmacth関数の使い方がおかしいのでしょうか。
他のgrep等の関数も使いましたがinteger(0)と返ってきました。
重ねての質問となり申し訳ございませんが、ご教授をお願いします。

[KojiDoi]

xとyがどうなっているのか、みせてください。元データが示されていないので、こちらも想像でしか答えられません。

[haruake]

大変失礼しました。
ｘは以下です。
> head(x,3)
都道府県名 市区町村名 大字.丁目名 小字.通称名 街区符号.地番 座標系番号 Ｘ座標 Ｙ座標 緯度 経度 住居表示フラグ 代表フラグ 更新前履歴フラグ
1 大阪府 大阪市都島区 毛馬町三丁目 8 6 -141814.1 -44144.5 34.72071 135.5180 1 1 0
2 大阪府 大阪市都島区 毛馬町三丁目 7 6 -141711.3 -44137.4 34.72163 135.5181 1 1 0
3 大阪府 大阪市都島区 毛馬町三丁目 7 6 -141756.2 -44139.3 34.72123 135.5181 1 0 0
更新後履歴フラグ
1 0
2 0
3 0

ｙは以下です。
> head(y,3)
[1] "大阪府大阪市都島区毛馬町三丁目86-141814.1-44144.534.72071135.51801100" "大阪府大阪市都島区毛馬町三丁目76-141711.3-44137.434.72163135.51811100"
[3] "大阪府大阪市都島区毛馬町三丁目76-141756.2-44139.334.72123135.51811000"

このような示しかたでよろしいでしょうか。
お手数をおかけしますが、よろしくお願いします。