Upgrade to Pro
— share decks privately, control downloads, hide ads and more …
Speaker Deck
Features
Speaker Deck
PRO
Sign in
Sign up for free
Search
Search
GTFS with Tidytransit package
Search
nonki1974
May 28, 2023
Technology
0
310
GTFS with Tidytransit package
Yakitori.R#03(2023/05/27)のLTで話した内容です
nonki1974
May 28, 2023
Tweet
Share
More Decks by nonki1974
See All by nonki1974
TokyoR#84_Rexams
nonki1974
0
200
都道府県別焼き鳥屋ランキングの作成
nonki1974
1
890
Introduction to R
nonki1974
0
340
Introduction to dplyr
nonki1974
0
480
Introduction to ggplot2
nonki1974
1
500
Analyzing PSB tracks with R
nonki1974
0
590
introduction to fukuoka.R @ Fukuoka.LT
nonki1974
0
62
所要時間のヒートマップを作成する
nonki1974
0
540
gtfsr package @ fukuoka.R #11
nonki1974
0
330
Other Decks in Technology
See All in Technology
RDS の負荷が高い場合に AWS で取りうる具体策 N 連発/a-series-of-specific-countermeasures-available-on-aws-when-rds-is-under-high-load
emiki
7
4.2k
FinOps について (ちょっと) 本気出して考えてみた
skmkzyk
0
170
CoRL 2025 Survey
harukiabe
1
220
新規事業におけるGORM+SQLx併用アーキテクチャ
hacomono
PRO
0
420
Introduction to Sansan Meishi Maker Development Engineer
sansan33
PRO
0
310
GoでもGUIアプリを作りたい!
kworkdev
PRO
0
160
ソースを読むプロセスの例
sat
PRO
15
9.4k
データ戦略部門 紹介資料
sansan33
PRO
1
3.8k
Implementing and Evaluating a High-Level Language with WasmGC and the Wasm Component Model: Scala’s Case
tanishiking
0
150
Performance Insights 廃止から Database Insights 利用へ/transition-from-performance-insights-to-database-insights
emiki
0
320
「使い方教えて」「事例教えて」じゃもう遅い! Microsoft 365 Copilot を触り倒そう!
taichinakamura
0
450
Liquid AI Hackathon Tokyo プレゼン資料
aratako
0
110
Featured
See All Featured
Art, The Web, and Tiny UX
lynnandtonic
303
21k
Design and Strategy: How to Deal with People Who Don’t "Get" Design
morganepeng
132
19k
Facilitating Awesome Meetings
lara
56
6.6k
[Rails World 2023 - Day 1 Closing Keynote] - The Magic of Rails
eileencodes
37
2.6k
A Tale of Four Properties
chriscoyier
161
23k
Dealing with People You Can't Stand - Big Design 2015
cassininazir
367
27k
Measuring & Analyzing Core Web Vitals
bluesmoon
9
620
Imperfection Machines: The Place of Print at Facebook
scottboms
269
13k
Java REST API Framework Comparison - PWX 2021
mraible
34
8.9k
Speed Design
sergeychernyshev
32
1.2k
Rails Girls Zürich Keynote
gr2m
95
14k
ピンチをチャンスに:未来をつくるプロダクトロードマップ #pmconf2020
aki_iinuma
127
54k
Transcript
GTFS with Tidytransit package @nonki1974
None
GTFS General Transit Feed Specification / / /
/
| 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
stop_times.txt
route.txt
Tidytransit package
GTFS https://ckan.odpt.org/dataset/b_bus_gtfs_jp-toei
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()
None
None
leaflet leaflet() %>% addTiles() %>% addPolylines(data = toeibus$shapes) %>% addMarkers(
data = toeibus$stops, label = toeibus$stops$stop_name )
leaflet
None
Enjoy!!