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
散布図と相関 / Scatter Plots and Correlations
Search
Sponsored
·
Ship Features Fearlessly
Turn features on and off without deploys. Used by thousands of Ruby developers.
→
Kenji Saito
PRO
December 09, 2023
Business
79
0
Share
Embed
Copy iframe code
Copy JS code
Copy link
Start on current slide
散布図と相関 / Scatter Plots and Correlations
早稲田大学大学院経営管理研究科「企業データ分析」2023 冬のオンデマンド教材 第5回で使用したスライドです。
Kenji Saito
PRO
December 09, 2023
More Decks by Kenji Saito
See All by Kenji Saito
ロボティクスの技術 / Robotics Technology
ks91
PRO
0
14
インシデントレスポンス演習 I / Incident Response Exercise I
ks91
PRO
0
22
責任 2.0/3.0 ∼ 知的創造過程の脱領土化 / Responsibility 2.0/3.0 - The Deterritorialization of the Intellectual Creative Process
ks91
PRO
0
9
エージェント化するAI:現在地とその先に起きる変化 〜 おかわり / AI as Agents: The Current State and the Changes Ahead - a second helping
ks91
PRO
0
27
金融テクノロジーのガバナンス / Governance of Financial Technology
ks91
PRO
0
50
セキュリティの基礎とインシデントレスポンス / Security Fundamentals and Incident Response
ks91
PRO
0
87
やり抜く力を見せるエージェントたち / Agents Who Demonstrate Perseverance
ks91
PRO
0
35
ブロックチェーン / Blockchain
ks91
PRO
0
120
デジタルとコミュニケーション / Digital and Communication
ks91
PRO
0
53
Other Decks in Business
See All in Business
CompanyDeck_v6.5.pdf
xid
3
27k
ラッコ株式会社 システム部 採用情報
mayahoney
0
24k
CSRレポート2026_ギークス株式会社
geechs
PRO
0
250
【結果報告】Claude×Linearで会社のタスク管理をAIにまかせて1ヶ月。業務効率150%向上したが、AIネイティブカンパニーを目指すならもっと「加速への狂気」が必要
nagatsu
1
450
アッテル会社紹介資料/culture deck
attelu
11
17k
捨てる、という判断 — エンジニアの役割の変化に向き合うConference
appleworld
1
700
紹介パートナー様向け 紹介手数料プランとご登録手順のご案内(マルコポーロ)
kimete
0
300
AIエージェントのデータガバナンスの最新事情。そしてプロダクトのAIファースト化
timakin
0
2.6k
BacklogとAIで変わった、 ウェブディレクターの仕事のリアル
wattlaa
0
220
楽しかった仕事の理由を深掘りしてみた
suzakiyoshito
0
150
ITが何の略なのかも知らないままエンジニアになっちゃったのでインターネットに生き恥を晒してみた話
m_k__77
1
270
AI導入PJの勝ちパターン KPI設計&意図的な社内AI格差
okuwakim
1
870
Featured
See All Featured
Navigating the Design Leadership Dip - Product Design Week Design Leaders+ Conference 2024
apolaine
1
340
Lightning Talk: Beautiful Slides for Beginners
inesmontani
PRO
2
570
Leveraging LLMs for student feedback in introductory data science courses - posit::conf(2025)
minecr
1
280
Paper Plane
katiecoart
PRO
1
51k
Leveraging Curiosity to Care for An Aging Population
cassininazir
1
270
The Cost Of JavaScript in 2023
addyosmani
55
10k
Kristin Tynski - Automating Marketing Tasks With AI
techseoconnect
PRO
0
270
Building the Perfect Custom Keyboard
takai
2
790
Visual Storytelling: How to be a Superhuman Communicator
reverentgeek
2
560
How to optimise 3,500 product descriptions for ecommerce in one day using ChatGPT
katarinadahlin
PRO
1
3.6k
Future Trends and Review - Lecture 12 - Web Technologies (1019888BNR)
signer
PRO
0
3.6k
[Rails World 2023 - Day 1 Closing Keynote] - The Magic of Rails
eileencodes
38
2.9k
Transcript
generated by Stable Diffusion XL v1.0 2023 5 (WBS) 2023
5 — 2023-12 – p.1/16
https://speakerdeck.com/ks91/collections/corporate-data-analysis-2023-winter 2023 5 — 2023-12 – p.2/16
( 20 ) 1 • 2 R • 3 •
4 • 5 • 6 ( ) 7 (1) 8 (2) 9 R ( ) (1) 10 R ( ) (2) 11 R ( ) (1) 12 R ( ) (2) 13 GPT-4 14 GPT-4 15 ( ) LaTeX Overleaf 8 (12/21 ) / (2 ) OK / 2023 5 — 2023-12 – p.3/16
RStudio Git ( ) 2 2023 5 — 2023-12 –
p.4/16
RStudio Git ( ) RStudio Git Git ( GPL) GitHub
Git ( ) RStudio pull 2023 5 — 2023-12 – p.5/16
Git RStudio Git (OS ) Linux : ( OK) macOS
: Xcode (Apple ) Xcode AppStore https://apps.apple.com/jp/app/xcode/id497799835 Windows : https://gitforwindows.org OK https://github.com/ks91/cda-demo Git 2023 5 — 2023-12 – p.6/16
(scatter plot) 2 x y ( ) (◦ ) plot
(verb): mark out or allocate (points) on a graph cda-demo “ .R” 1 2023 5 — 2023-12 – p.7/16
“ .txt” 1 1 <- read.table(" .txt", header=T) plot( 1,
xlim=c(0, 100), ylim=c(0, 100), xlab=" ", ylab=" ", main=" ") : 2023 5 — 2023-12 – p.8/16
0 20 40 60 80 100 0 20 40 60
80 100 ṇࡢ┦㛵ࡢ ⱥㄒࡢヨ㦂⤖ᯝ ᩘᏛࡢヨ㦂⤖ᯝ 2023 5 — 2023-12 – p.9/16
“ .txt” 2 2 <- read.table(" .txt", header=T) plot( 2,
xlim=c(0, 20.0), ylim=c(13.0, 18.0), xlab=" ", ylab="100m ( )", main=" ") : 2023 5 — 2023-12 – p.10/16
0 5 10 15 20 13 14 15 16 17
18 ㈇ࡢ┦㛵ࡢ 㐌ᙜࡓࡾࡢㄢእ㐠ື㛫 100m㉮ࡢࢱ࣒ (⛊) 2023 5 — 2023-12 – p.11/16
1 2 plot( 1$ , 2$ , xlim=c(0, 100), ylim=c(13.0,
18.0), xlab=" ", ylab="100m ( )", main=" ") ( ) : 2023 5 — 2023-12 – p.12/16
0 20 40 60 80 100 13 14 15 16
17 18 ↓┦㛵ࡢ ⱥㄒࡢヨ㦂⤖ᯝ 100m㉮ࡢࢱ࣒ (⛊) 2023 5 — 2023-12 – p.13/16
3 1 2 3 3 <- data.frame( = 1$ ,
= 1$ , = 2$ , = 2$ ) plot( 3) 2 12 : plot 2023 5 — 2023-12 – p.14/16
ⱥㄒ 20 40 60 80 20 40 60 80 100
13 14 15 16 17 20 40 60 80 ᩘᏛ 㐠ື㛫 0 5 10 15 13 14 15 16 17 20 40 60 80 100 0 5 10 15 ▷㊥㞳 2023 5 — 2023-12 – p.15/16
2023 5 — 2023-12 – p.16/16