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
xaringanパッケージの内容をちょっとだけ
Search
Kazuhiro Maeda
October 11, 2019
Technology
0
1.1k
xaringanパッケージの内容をちょっとだけ
Yakitori.R #02 (fukuoka.R #16)
Kazuhiro Maeda
October 11, 2019
Tweet
Share
More Decks by Kazuhiro Maeda
See All by Kazuhiro Maeda
Will Positron accelerate us? (update)
kazutan
1
120
積もってく会議メモをどうにかしたかった
kazutan
0
250
分析システムにR Markdownを組み込む
kazutan
0
510
Rに管理されてみる
kazutan
0
460
私とR、そしてキャリア
kazutan
2
3.8k
tubeplayR v1.0への道
kazutan
2
220
R, Git, Droneを使ってconfluenceへのKPI予測レポートを自動化した話
kazutan
2
660
週次KPIレポートをconfluenceへUpするためにやったこと
kazutan
1
1.5k
最近のRパッケージ開発事情
kazutan
0
370
Other Decks in Technology
See All in Technology
ZOZOマッチのアーキテクチャと技術構成
zozotech
PRO
3
1.5k
Flutterでキャッチしないエラーはどこに行く
taiju59
0
230
新アイテムをどう使っていくか?みんなであーだこーだ言ってみよう / 20250911-rpi-jam-tokyo
akkiesoft
0
180
職種の壁を溶かして開発サイクルを高速に回す~情報透明性と職種越境から考えるAIフレンドリーな職種間連携~
daitasu
0
140
「全員プロダクトマネージャー」を実現する、Cursorによる仕様検討の自動運転
applism118
20
9.4k
バッチ処理で悩むバックエンドエンジニアに捧げるAWS Glue入門
diggymo
3
190
Agile PBL at New Grads Trainings
kawaguti
PRO
1
400
共有と分離 - Compose Multiplatform "本番導入" の設計指針
error96num
1
360
ChatGPTとPlantUML/Mermaidによるソフトウェア設計
gowhich501
1
130
S3アクセス制御の設計ポイント
tommy0124
3
190
実践!カスタムインストラクション&スラッシュコマンド
puku0x
0
350
生成AI時代のデータ基盤設計〜ペースレイヤリングで実現する高速開発と持続性〜 / Levtech Meetup_Session_2
sansan_randd
1
150
Featured
See All Featured
Reflections from 52 weeks, 52 projects
jeffersonlam
352
21k
Into the Great Unknown - MozCon
thekraken
40
2k
Visualization
eitanlees
148
16k
Art, The Web, and Tiny UX
lynnandtonic
302
21k
How To Stay Up To Date on Web Technology
chriscoyier
790
250k
It's Worth the Effort
3n
187
28k
Evolution of real-time – Irina Nazarova, EuRuKo, 2024
irinanazarova
8
920
RailsConf & Balkan Ruby 2019: The Past, Present, and Future of Rails at GitHub
eileencodes
139
34k
Context Engineering - Making Every Token Count
addyosmani
1
33
Imperfection Machines: The Place of Print at Facebook
scottboms
268
13k
Bootstrapping a Software Product
garrettdimon
PRO
307
110k
Speed Design
sergeychernyshev
32
1.1k
Transcript
xaringan パッケージの内容をちょっとだけ fukuoka.R / Yakitori.R kazutan 2019-10-11
今⽇のお話 xaringanパッケージとは 実はエグい実装その1 実はエグい実装その2 2 / 17
xaringan パッケージとは R NinjaことYihui作のパッケージ 基本的な情報 R Markdownでスライドを作成できる remark.jsというライブラリを活⽤ 気付いたら世界各地で流⾏った このスライドもそうです
特徴 renderが軽量 chunkの評価は別 リアルタイムで編集をPreviewできる 他のRmdスライドテンプレートとはちょいちょい書き⽅が違う 例えばスライド区切りが だったり 3 / 17
xaringan 、内部的にはかなりエグい remark.jsを利⽤している remark.jsはmarkdown記法の⽂字列を読み込んでスライド化 実はこれが問題となる(後述) R Ninjaは「隠れ蓑の術」でクリアした リアルタイム編集(markdownレンダリング) 本来R MarkdownはrenderしないとViewerに出せない
R Ninjaはこれを「無限⽉読」(個⼈的には千⾥眼?)でクリアした 今⽇はこのあたりを簡単に紹介 4 / 17
おさらい: R Markdown の処理 詳しくは以下の記事を参照: R Markdownの内部とテンプレート開発 https://kazutan.github.io/TokyoR61/intoTheRmarkdown_d.html R Markdown
の流れ <Pandoc 系> <knit 系> .md pre_processor html, docs, pdf... output_format post_processor Pandoc .Rmd フォーマット テンプレ pre_knit .md output_format post_knit knit 5 / 17
忍法「隠れ蓑の術」 課題1 remark.jsはmarkdown記法を対象とするけど、Pandocを通すと強制的にhtmlにされてしま う。どうしたらいいか? R Ninjaの回答 スライドに表⽰させるドキュメント部分をバイパスさせればいい は? 6 /
17
忍法「隠れ蓑の術」 コード部分(1) バイパスさせるために、⼀時ファイルを準備 https://github.com/yihui/xaringan/blob/master/R/render.R#L84 コメントでも書いてますね tmp_md = tempfile('xaringan', fileext =
'.md') # store md content here (bypass Pandoc 7 / 17
忍法「隠れ蓑の術」 コード部分(2) 以下の処理をpre_processorとして準備 Rmdファイルからyamlとbodyを分離させる body部分をさっきの添付ファイルに書き込む https://github.com/yihui/xaringan/blob/master/R/render.R#L172-L185 pre_processor = function( metadata,
input_file, runtime, knit_meta, files_dir, output_dir ) { res = split_yaml_body(input_file) write_utf8(res$yaml, input_file) res$body = protect_math(res$body) content = htmlEscape(yolofy(res$body, yolo)) Encoding(content) = 'UTF-8' write_utf8(content, tmp_md) c( if (seal) c(' variable', 'title slide=true'), if (!identical(body, res$body)) c(' variable', 'math=true') ) }, 8 / 17
忍法「隠れ蓑の術」 コード部分(3) pandocによる変換処理の後に、Pandocの挿⼊機能を使って差し込む https://github.com/yihui/xaringan/blob/master/R/render.R#L119-L138 html_document2 = function( , includes =
list(), mathjax = 'default', pandoc_args = NULL ) { if (length(includes) 0) includes = list() includes$before_body = c(includes$before_body, tmp_md) includes$after_body = c(tmp_js, includes$after_body) 実際には細かい調整とかしてるけど、⼤まかにはこんな感じです 9 / 17
忍法「無限⽉読」 課題2 どうやってリアルタイムレンダリングしてるの? R Ninjaの回答 こんな感じで: 1. 簡易的なHTTPサーバーを起動させる servr パッケージで実現
2. 必要なライブラリを送る remark.jsなど 3. RmdファイルをHTTPサーバーへ送り、Viewerに表⽰させる Viewerについてはこちら tubeplayRパッケージはなぜRStudio上でYouTubeを再⽣できるのか 4. Rmdファイルをモニタリングし、変更を察知したらそれをサーバーへ送る rstudioapiを駆使している remark.jsがmdを読み込むというのがポイント 5. 変更を察知したら、Viewerを再読み込みさせる 10 / 17
まとめ R Ninjaまじすごい 11 / 17
おまけ 12 / 17
13 / 17
14 / 17
15 / 17
みんなNinja になろう 16 / 17
Enjoy! 17 / 17