Upgrade to Pro — share decks privately, control downloads, hide ads and more …
Sign up for free

GTFS with Tidytransit package

Avatar for nonki1974 nonki1974
May 28, 2023
Technology
350
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
240
都道府県別焼き鳥屋ランキングの作成
Avatar for nonki1974 nonki1974
1
940
Introduction to R
Avatar for nonki1974 nonki1974
0
400
Introduction to dplyr
Avatar for nonki1974 nonki1974
0
570
Introduction to ggplot2
Avatar for nonki1974 nonki1974
1
560
Analyzing PSB tracks with R
Avatar for nonki1974 nonki1974
0
640
introduction to fukuoka.R @ Fukuoka.LT
Avatar for nonki1974 nonki1974
0
85
所要時間のヒートマップを作成する
Avatar for nonki1974 nonki1974
0
620
gtfsr package @ fukuoka.R #11
Avatar for nonki1974 nonki1974
0
370

Other Decks in Technology

See All in Technology
LocalStack を使ったサーバーレスアプリケーション開発 / Serverless Development with LocalStack
Avatar for Yoshiaki Yoshida kakakakakku
1
410
自分で立ててみるLLMサービス
Avatar for 世良泰明 y_sera15
0
160
継続的なAIコスト最適化
Avatar for Atsushi Tanaka bgpat
1
290
Kiro Crewをはじめよう
Avatar for t.kizawa kizawa2020
1
140
V8のArray.prototype.flatを最大約20倍速くするまでと、巨大OSSへの大規模コミットの道のり
Avatar for Riya Amemiya riyaamemiya
0
270
Datadog の学び方 - あるいは、オブザーバビリティを学ぶとは何か
Avatar for iwa mananyuki
1
550
12 個 Tool と、 4,096 Token
Avatar for ラワンアウンピョウ hlum
0
140
おそらく日本で唯一のDevRelインターン生として
Avatar for husensan husengs7
0
180
分析の民主化を支えるメタデータ整備の実践
Avatar for KAKEHASHI kakehashi
PRO
4
1.3k
UniFi（ユニファイ）AIカメラの現場活用
Avatar for ludicmind ludicmind
1
420
AgentCoreで実践するハーネスエンジニアリング
Avatar for やくも yakumo
1
300
Loop Engineering, beyond prompt, context, and harness engineering
Avatar for Guillaume Laforge glaforge
0
100

Featured

See All Featured
Lightning talk: Run Django tests with GitHub Actions
Avatar for Sarah Abderemane sabderemane
0
300
Responsive Adventures: Dirty Tricks From The Dark Corners of Front-End
Avatar for Vitaly Friedman smashingmag
254
22k
10 Git Anti Patterns You Should be Aware of
Avatar for Lemi Orhan Ergin lemiorhan
PRO
659
62k
Designing for Performance
Avatar for Lara Hogan lara
612
70k
CSS Pre-Processors: Stylus, Less & Sass
Avatar for Bermon Painter bermonpainter
360
31k
Crafting Experiences
Avatar for Bethany Jepchumba bethany
1
380
Leadership Guide Workshop - DevTernity 2021
Avatar for David Neal reverentgeek
1
400
Design in an AI World
Avatar for tapps tapps
1
350
Understanding Cognitive Biases in Performance Measurement
Avatar for Philip Tellis bluesmoon
32
3k
HDC tutorial
Avatar for Michiel Stock michielstock
2
950
Agile Leadership in an Agile Organization
Avatar for Dr. Kim W Petersen kimpetersen
PRO
0
280
The Power of CSS Pseudo Elements
Avatar for Geoffrey Crofte geoffreycrofte
82
6.6k

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