|
・A列車と「R with Excel」のスズメ（雀）
（約3000字）
☆A列車と「R with Excel」のスズメ（雀）
PCゲーム「A列車で行こう9」をお楽しみのしょくん。「ぎおんのじょん7号」のお時間だ。（※表現は演出です。）このフォーラム、[4236]に掲載の「R with Excel」に従って、フリーの統計解析環境「R」を実際に手元で動かしてみてくれたまへ。PCゲーム「A列車で行こう9」は持っていなくてもいい。「R」が動くPCがありさえすればいい。
・「R」です
https://cran.ism.ac.jp/
> Download R for Linux
> Download R for (Mac) OS X
> Download R for Windows
※さすがにChromebookは除く。
・TSVデータになります
https://neorail.jp/forum/uploads/region7_xyz.tsv
※このTSVデータについては[3883],[3884]も参照。
・拙作「点・望・山」にインポートすると画像が得られます
https://neorail.jp/fun/M243-11Y/
・要するにこういう地形データです
https://neorail.jp/forum/uploads/map_region7.png
![https://neorail.jp/forum/uploads/map_region7.png]()
まだ「プラン」は考えたことのなかった地形データです。きょうはここから＆はじまりました！（棒読み）
・k=7
| 1 | 2 | 3 | 4 | 5 | 6 | 7 |
|---|
| 10169 | 7308 | 3883 | 6245 | 9879 | 11721 | 9229 |
| 1 | 2 | 3 | 4 | 5 | 6 | 7 |
|---|
| -80 | 0 | 0 | 2111 | 0 | 7598 | 0 | 0 |
|---|
| -70 | 0 | 0 | 335 | 0 | 747 | 0 | 0 |
|---|
| -60 | 0 | 0 | 405 | 0 | 664 | 0 | 0 |
|---|
| -50 | 69 | 0 | 518 | 0 | 531 | 0 | 0 |
|---|
| -40 | 157 | 86 | 488 | 0 | 339 | 0 | 0 |
|---|
| -30 | 274 | 366 | 26 | 0 | 0 | 19 | 366 |
|---|
| -20 | 447 | 419 | 0 | 1 | 0 | 37 | 234 |
|---|
| -10 | 590 | 493 | 0 | 5 | 0 | 33 | 251 |
|---|
| -3 | 1041 | 881 | 0 | 984 | 0 | 902 | 641 |
|---|
| 0 | 7189 | 4532 | 0 | 3345 | 0 | 10163 | 7218 |
|---|
| 10 | 214 | 285 | 0 | 999 | 0 | 286 | 290 |
|---|
| 20 | 188 | 246 | 0 | 911 | 0 | 281 | 229 |
|---|
うーん。すっかり「k=7」である。最初から「k=7」するというていたらく。えー…（てんてんてん）。
https://neorail.jp/forum/uploads/map_region7_cbd_km7.png
![https://neorail.jp/forum/uploads/map_region7_cbd_km7.png]()
これがどうしてなかなか「k=7」ですっきり。（※超訳）「5」の水面で分かれているけれど、北西の角の陸地も「2」に含まれる。「1」「6」「4」の境界は、あまり手がかりになる起伏がないから単純な直線が適当に引かれたというふうである。「7」「6」「4」の『三ツ境！』が味わい深い。
http://www.city.katsushika.lg.jp/history/history/p_image/1/%e6%b0%b4%e5%85%83%e5%85%ac%e5%9c%92%e3%81%ae%e5%9c%b0%e4%b8%8b%e6%a7%8b%e9%80%a0.jpg
> 石灰ナンノ化石
なんのかせき？ うん。…だー・かー・らー！！ なんのかせき？ …え？ ……え？（※ひらがな）ちょっと「きょうは西早稲田で本場のカレー。」いってみよっか。（違）
https://stat.ameba.jp/user_images/20200302/05/house-estgroup/37/2a/j/o1701127614721616001.jpg
https://tpo-web.s3-ap-northeast-1.amazonaws.com/blog/wp-content/uploads/old/blog_import_546ae11d5a30e.jpg
https://tblg.k-img.com/restaurant/images/Rvw/56303/640x640_rect_56303978.jpg
・ゆんゆん
https://neorail.jp/forum/uploads/r_region7_cbd_cmp.png
![https://neorail.jp/forum/uploads/r_region7_cbd_cmp.png]()
あまりぱっとしないけれど、クラスタリングの結果には納得感がある。
https://livedoor.blogimg.jp/rakudacoffee/imgs/1/f/1f954968.jpg
https://pbs.twimg.com/media/DxPxV0uUcAAfxR8.png
もどってきちゃった（違）ここで、最大のクラスター「6」はCBD（都心）たりえない、と決めつけて（※勝手な決めつけです）、じゃあ、どこがCBDなのかと小一時間（しばらくお待ちください）小一時間って、15分ですよね。（違）
・「1」：水面も山も含んで、全体で2番目に大きい
・「7」：3番目に大きい
・「2」：4番目に大きい
・「4」：水面を含まないも同然
http://s-ohtsuki.sakura.ne.jp/subway/eidan/touzaiH2410/DaiKukan02_Touyou_Chou-Iidabashi-Nakano/Kukan02_Iidabashi-Takada_no_Baba-Nakano/Sub1_Iidabashi-Waseda-Takada_no_Baba/TozaiH2410_286.JPG
https://soseki-museum.jp/site/wp-content/uploads/2019/02/IMG_5889.jpg
https://www.tokyo-park.or.jp/park/top/img/request0526.jpg
http://s-ohtsuki.sakura.ne.jp/purpose/University/01%20Waseda/01-03%20Nishi%20Ohkubo%20Campus/Takadanobaba-NakanoH160207-011.jpg
http://s-ohtsuki.sakura.ne.jp/subway/eidan/Fuku_ToshinH2503/Sub2_Meiji_Douri-Nishi_Waseda_Eki-Waseda_Rikou/Fuku_ToshinH2503_085.JPG
http://s-ohtsuki.sakura.ne.jp/purpose/University/01%20Waseda/01-03%20Nishi%20Ohkubo%20Campus/Takadanobaba-NakanoH160207-009.jpg
https://pbs.twimg.com/media/CvDKw4KUIAEaKB8.png
うーん。
・「1」がCBDで「2」が「火力発電所」？
・「1」がCBDで「7」が「火力発電所」？
・「7」がCBDで「1」が「火力発電所」？
・「7」がCBDで「2」が「火力発電所」？
…ど・れ・に・す・る？ どれでもいいや。（※恐縮です。）
[4242]に続きます。
| 
