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

GTFS with Tidytransit package

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

Other Decks in Technology

See All in Technology
QAエンジニア起点で進める、SmartHRにおける信頼性向上について
Avatar for kaomi kaomi_wombat
1
150
Model Studio CLI × Token Plan
Avatar for 尾関将樹 | めい maigo999
0
190
Bill One 開発エンジニア 紹介資料
Avatar for Sansan, Inc. sansan33
PRO
7
20k
Bits AI を制するものは Datadog を制す / The player that controls  Bits AI, controls Datadog
Avatar for 株式会社カミナシ kaminashi
0
130
35分でわかるEffective Platform Engineering
Avatar for nwiizo nwiizo
3
300
まちスペース®とデジタルツインと「まちづくり」
Avatar for hiro_OGI hiro_ogi
0
130
ラジオの科学
Avatar for Frieve-A frievea
0
340
AI-DLC実践録_フルサイクル開発への挑戦
Avatar for Miyuki miyuc
0
240
【CEDEC2026】Creative Approaches to Localizing the Dialects and Unique Speech of Umamusume: Pretty Derby Characters in English
Avatar for Cygames, Inc. cygames
PRO
3
25k
攻撃と防御で学ぶAI時代のプロダクトセキュリティ演習
Avatar for Recruit recruitengineers
PRO
9
3k
20260807_第6回_関東kaggler会LT_claw系bot xangiと始める、"寂しくない" kaggle
Avatar for suguuuuuすぐー sugupoko
0
330
修正PRを食べてレビュースキルが賢くなる：Claude Codeによる自己改善サイクル
Avatar for um(うめ) yuyaumetsu
6
1.6k

Featured

See All Featured
The Psychology of Web Performance [Beyond Tellerrand 2023]
Avatar for Tammy Everts tammyeverts
49
3.5k
Optimising Largest Contentful Paint
Avatar for Harry Roberts csswizardry
37
3.9k
AI: The stuff that nobody shows you
Avatar for John Nunemaker jnunemaker
PRO
9
920
A Modern Web Designer's Workflow
Avatar for Chris Coyier chriscoyier
698
190k
Measuring & Analyzing Core Web Vitals
Avatar for Philip Tellis bluesmoon
9
960
Unsuck your backbone
Avatar for Amy Palamountain ammeep
672
58k
技術選定の審美眼（2025年版） / Understanding the Spiral of Technologies 2025 edition
Avatar for Takuto WADA twada
PRO
120
120k
Ten Tips & Tricks for a 🌱 transition
Avatar for Manu Carrasco Molina stuffmc
0
170
How to Think Like a Performance Engineer
Avatar for Harry Roberts csswizardry
28
2.7k
Introduction to Domain-Driven Design and Collaborative software design
Avatar for Kenny Baas-Schwegler baasie
1
940
sira's awesome portfolio website redesign presentation
Avatar for ElsiraPls elsirapls
0
320
The Success of Rails: Ensuring Growth for the Next 100 Years
Avatar for Eileen M. Uchitelle eileencodes
47
8.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!!