Upgrade to Pro — share decks privately, control downloads, hide ads and more …

GTFS with Tidytransit package

Avatar for nonki1974 nonki1974
May 28, 2023
Technology
330
0

GTFS with Tidytransit package

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

Avatar for nonki1974

nonki1974

May 28, 2023

More Decks by nonki1974

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

Other Decks in Technology

See All in Technology
みんなの「データ活用」を支えるストレージ担当から持ち込むAWS活用/コミュニティー設計TIPS 10選~「作れる」より、「続けられる」設計へ~
Avatar for Yoshiki Fujiwara yoshiki0705
0
250
エージェントスキルを作って自分のインプットに役立てよう
Avatar for Yuta Matsumura tsubakimoto_s
0
370
Rapid Start: Faster Internet Connections, with Ruby's Help
Avatar for kazuho kazuho
2
600
The Journey of Box Building
Avatar for Satoshi Tagomori tagomoris
4
2.8k
Contract One Engineering Unit 紹介資料
Avatar for Sansan, Inc. sansan33
PRO
0
16k
Hacobu Tech Deck
Avatar for Hacobu hacobu
PRO
0
110
QGISプラグイン CMChangeDetector
Avatar for Forestgeo.info naokimuroki
1
410
20260428_Product Management Summit_Loglass_JoeHirose
Avatar for 広瀬丈 loglassjoe
0
1.5k
Eight Engineering Unit 紹介資料
Avatar for Sansan, Inc. sansan33
PRO
3
7.3k
[最強DB講義]推薦システム | 基礎編
Avatar for RecSysLab recsyslab
PRO
1
170
AI와 협업하는 조직으로의 여정
Avatar for Arawn Park arawn
0
450
Good Enough Types: Heuristic Type Inference for Ruby
Avatar for Shia riseshia
1
230

Featured

See All Featured
How To Stay Up To Date on Web Technology
Avatar for Chris Coyier chriscoyier
790
250k
How to Align SEO within the Product Triangle To Get 
Buy-In & Support - #RIMC
Avatar for Aleyda Solis aleyda
2
1.5k
Test your architecture with Archunit
Avatar for Yoan thirion
1
2.2k
The Power of CSS Pseudo Elements
Avatar for Geoffrey Crofte geoffreycrofte
82
6.2k
Winning Ecommerce Organic Search in an AI Era - #searchnstuff2025
Avatar for Aleyda Solis aleyda
1
2k
Navigating the moral maze — ethical principles for Al-driven product design
Avatar for Skipper Chong Warson skipperchong
2
340
ラッコキーワード サービス紹介資料
Avatar for ラッコ株式会社 rakko
1
3.1M
Navigating Weather and Climate Data
Avatar for Ryan Abernathey rabernat
0
170
Everyday Curiosity
Avatar for Cassini Nazir cassininazir
0
200
HDC tutorial
Avatar for Michiel Stock michielstock
2
630
Measuring & Analyzing Core Web Vitals
Avatar for Philip Tellis bluesmoon
9
810
Stewardship and Sustainability of Urban and Community Forests
Avatar for Eric Wiseman pwiseman
0
180

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!!