Upgrade to PRO for Only $50/Year—Limited-Time Offer! 🔥

GTFS with Tidytransit package

Avatar for nonki1974 nonki1974
May 28, 2023
Technology
0
310

GTFS with Tidytransit package

Yakitori.R#03（2023/05/27）のLTで話した内容です

Avatar for nonki1974

nonki1974

May 28, 2023
Tweet

More Decks by nonki1974

See All by nonki1974
TokyoR#84_Rexams
Avatar for nonki1974 nonki1974
0
200
都道府県別焼き鳥屋ランキングの作成
Avatar for nonki1974 nonki1974
1
890
Introduction to R
Avatar for nonki1974 nonki1974
0
350
Introduction to dplyr
Avatar for nonki1974 nonki1974
0
520
Introduction to ggplot2
Avatar for nonki1974 nonki1974
1
510
Analyzing PSB tracks with R
Avatar for nonki1974 nonki1974
0
590
introduction to fukuoka.R @ Fukuoka.LT
Avatar for nonki1974 nonki1974
0
66
所要時間のヒートマップを作成する
Avatar for nonki1974 nonki1974
0
550
gtfsr package @ fukuoka.R #11
Avatar for nonki1974 nonki1974
0
340

Other Decks in Technology

See All in Technology
AIと二人三脚で育てた、個人開発アプリグロース術
Avatar for ZOZO Developers zozotech
PRO
0
690
WordPress は終わったのか ～今のWordPress の制作手法ってなにがあんねん？～ / Is WordPress Over? How We Build with WordPress Today
Avatar for tbshiki tbshiki
0
210
5分で知るMicrosoft Ignite
Avatar for Taiji HAGINO taiponrock
PRO
0
220
バグハンター視点によるサプライチェーンの脆弱性
Avatar for morioka12 scgajge12
3
1k
因果AIへの招待
Avatar for Shohei SHIMIZU sshimizu2006
0
930
“決まらない”NSM設計への処方箋 〜ビットキーにおける現実的な指標デザイン事例〜 / A Prescription for "Stuck" NSM Design: Bitkey’s Practical Case Study
Avatar for 株式会社ビットキー / Bitkey Inc. bitkey
PRO
1
580
今からでも間に合う！速習Devin入門とその活用方法
Avatar for Izumu KUSUNOKI ismk
1
510
第4回 「メタデータ通り」　リアル開催
Avatar for データ横丁 datayokocho
0
120
チーリンについて
Avatar for ぐっち hirotomotaguchi
3
980
生成AI・AIエージェント時代、データサイエンティストは何をする人なのか？そして、今学生であるあなたは何を学ぶべきか？
Avatar for kuri8ive kuri8ive
2
2.1k
AI時代におけるアジャイル開発について
Avatar for Polyscape Inc. polyscape_inc
0
130
学習データって増やせばいいんですか？
Avatar for fumihiko takahashi ftakahashi
1
250

Featured

See All Featured
Distributed Sagas: A Protocol for Coordinating Microservices
Avatar for Caitie McCaffrey caitiem20
333
22k
Reflections from 52 weeks, 52 projects
Avatar for Jefferson Lam jeffersonlam
355
21k
Practical Orchestrator
Avatar for Shlomi Noach shlominoach
190
11k
Easily Structure & Communicate Ideas using Wireframe
Avatar for Afnizar Nur Ghifari afnizarnur
194
17k
The Cost Of JavaScript in 2023
Avatar for Addy Osmani addyosmani
55
9.3k
How Fast Is Fast Enough? [PerfNow 2025]
Avatar for Tammy Everts tammyeverts
3
390
Bootstrapping a Software Product
Avatar for Garrett Dimon garrettdimon
PRO
307
120k
Design and Strategy: How to Deal with People Who Don’t "Get" Design
Avatar for Morgane Peng morganepeng
132
19k
The Straight Up "How To Draw Better" Workshop
Avatar for Dennis Kardys denniskardys
239
140k
Being A Developer After 40
Avatar for Adrian Kosmaczewski akosma
91
590k
How to Create Impact in a Changing Tech Landscape [PerfNow 2023]
Avatar for Tammy Everts tammyeverts
55
3.1k
Improving Core Web Vitals using Speculation Rules API
Avatar for Sergey Chernyshev sergeychernyshev
21
1.3k

Transcript

  1. GTFS with Tidytransit package @nonki1974

  2. None

  3. GTFS  General Transit Feed Specification  / / /

    /

  4. | Zip agency.txt stops.txt routes.txt trips.txt stop_times.txt calendar.txt calendar_dates.txt fare_attributes.txt

    fare_rules.txt shapes.txt frequencies.txt transferes.txt feed_info.txt

  5. stop_times.txt

  6. route.txt

  7. Tidytransit package

  8. GTFS  https://ckan.odpt.org/dataset/b_bus_gtfs_jp-toei

  9. GTFS -> sf toeibus <- read_gtfs("./ToeiBus-GTFS.zip") # attributionsのidが空になっているので警告が出る # GTFSオブジェクトとして読み込まれず単なるリストになる

    # 修正してから as_tidygtfs() 関数で改めてGTFSオブジェクトに変換 toeibus$attributions$attribution_id <- 1:2 toeibus <- as_tidygtfs(toeibus) toeibus <- gtfs_as_sf(toeibus) ggplot(toeibus$shapes) + geom_sf() + theme_minimal() ggplot(toeibus$stops) + geom_sf() + theme_minimal()
  10. None
  11. None

  12. leaflet leaflet() %>% addTiles() %>% addPolylines(data = toeibus$shapes) %>% addMarkers(

    data = toeibus$stops, label = toeibus$stops$stop_name )

  13. leaflet

  14. None

  15. Enjoy!!