Upgrade to Pro
— share decks privately, control downloads, hide ads and more …
Speaker Deck
Sign up for free
Menu
Search
Features
All features
Private URLs
Password Protection
Custom URLS
Scheduled publishing
Remove Branding
Restrict embedding
Deck Collections
Notes
Features
All features
Private URLs
Password Protection
Custom URLS
Scheduled publishing
Remove Branding
Restrict embedding
Deck Collections
Notes
Explore
Featured decks
Featured speakers
Programming
Technology
Storyboards
Explore
Featured decks
Featured speakers
Programming
Technology
Storyboards
Pricing
Search
Sign in
Sign up for free
GTFS with Tidytransit package
Search
nonki1974
May 28, 2023
Technology
340
0
Share
Embed
Copy iframe code
Copy JS code
Copy link
Start on current slide
GTFS with Tidytransit package
Yakitori.R#03(2023/05/27)のLTで話した内容です
nonki1974
May 28, 2023
More Decks by nonki1974
See All by nonki1974
TokyoR#84_Rexams
nonki1974
0
240
都道府県別焼き鳥屋ランキングの作成
nonki1974
1
930
Introduction to R
nonki1974
0
400
Introduction to dplyr
nonki1974
0
570
Introduction to ggplot2
nonki1974
1
550
Analyzing PSB tracks with R
nonki1974
0
630
introduction to fukuoka.R @ Fukuoka.LT
nonki1974
0
82
所要時間のヒートマップを作成する
nonki1974
0
610
gtfsr package @ fukuoka.R #11
nonki1974
0
360
Other Decks in Technology
See All in Technology
MCPをつなげて作る組織横断のAIエージェント基盤(の開発工程)
tsubakimoto_s
0
130
Issue 駆動でスペシャリストの意図を届ける、AI 実装のアクセシビリティ向上
thkt
0
110
AI時代の「技術的負債」の変質ー概念の終焉と再解釈、エージェントと共に向かう先
nwiizo
0
2.6k
synctest時代のhttptest Go 1.27で変わるHTTPサーバテストの裏側 / go conference2026 synctest and httptest
budougumi0617
1
3k
20260912_スクフェス三河
kgnkhkr
0
380
SREは、MCPとAutopilotをこう使え!
kazumax55
2
800
AI時代、データエンジニアが一番おもろい
genshun9
0
590
「守り」で活用するオンデバイスLLM 〜写ってはいけないを総力戦で防ぐ〜 / iOSDC Japan 2026
nakamuuu
0
160
HRC_Frontend_Conference_Fukuoka_2026.pdf
ts020
0
720
積み重なった技術負債への挑戦 〜初手としての全社ゴト化〜
techtekt
PRO
0
1.2k
データ界隈LT祭 第1回LT登壇
taromatsui_cccmkhd
1
1.3k
iOSDC Japan 2026 day1 TrackC 10:50
feedtailor
1
160
Featured
See All Featured
Leveraging LLMs for student feedback in introductory data science courses - posit::conf(2025)
minecr
1
390
ピンチをチャンスに:未来をつくるプロダクトロードマップ #pmconf2020
aki_iinuma
128
56k
Build The Right Thing And Hit Your Dates
maggiecrowley
39
3.4k
The Director’s Chair: Orchestrating AI for Truly Effective Learning
tmiket
1
300
Easily Structure & Communicate Ideas using Wireframe
afnizarnur
194
17k
Building Applications with DynamoDB
mza
96
7.2k
Designing for humans not robots
tammielis
254
26k
The Psychology of Web Performance [Beyond Tellerrand 2023]
tammyeverts
49
3.6k
Why Mistakes Are the Best Teachers: Turning Failure into a Pathway for Growth
auna
0
280
Paper Plane
katiecoart
PRO
4
53k
JavaScript: Past, Present, and Future - NDC Porto 2020
reverentgeek
52
6.1k
What’s in a name? Adding method to the madness
productmarketing
PRO
24
4.2k
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!!