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
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
61
インシデントレスポンス演習 I / Incident Response Exercise I
ks91
PRO
0
88
責任 2.0/3.0 ∼ 知的創造過程の脱領土化 / Responsibility 2.0/3.0 - The Deterritorialization of the Intellectual Creative Process
ks91
PRO
0
17
エージェント化するAI:現在地とその先に起きる変化 〜 おかわり / AI as Agents: The Current State and the Changes Ahead - a second helping
ks91
PRO
0
31
金融テクノロジーのガバナンス / Governance of Financial Technology
ks91
PRO
0
69
セキュリティの基礎とインシデントレスポンス / Security Fundamentals and Incident Response
ks91
PRO
0
95
やり抜く力を見せるエージェントたち / Agents Who Demonstrate Perseverance
ks91
PRO
0
37
ブロックチェーン / Blockchain
ks91
PRO
0
130
デジタルとコミュニケーション / Digital and Communication
ks91
PRO
0
54
Other Decks in Business
See All in Business
エージェントスキル:自律型AIが変える最適化とサプライチェーンの未来
mickey_kubo
0
140
CMB.TECH earnings call Q1 2026
cmbtech
PRO
0
1.9k
どこまでを引き受けるのか — 変わり続ける役割と、変わらない思考法 / How Much We Take On — Evolving Roles and Enduring Ways of Thinking
nrslib
2
940
【簡易版】パーソルクロステクノロジー_システムインテグレーション領域のご紹介 / Introduction_of_persol-xtech_gs_es_dx_short
pxt_gs_ssol
0
170k
データ民主化の推進に必要なメンタリティーを伝えたい
hikaruri
0
140
長時間実行タスクを簡単にするLambda durable functionsの活用方法
takuyaakaike
0
420
アッテル会社紹介資料/culture deck
attelu
11
17k
株式会社Beer and Tech/HitoHana(ひとはな) 採用資料 2026.06 .09
beerandtech_recruiter
1
48k
Smart Share Recruiting Deck
smartshare
0
540
株式会社リバイブル 会社説明資料
rebible
0
1k
タケウチグループRecruit
takeuchigroup
0
12k
"分からないまま走る"をやめたら不確実性に向き合えるチームになっていった話 ~開発指標で語るプロセス改善~
bicstone
1
220
Featured
See All Featured
Ruling the World: When Life Gets Gamed
codingconduct
0
250
Fireside Chat
paigeccino
42
3.9k
From π to Pie charts
rasagy
0
210
Facilitating Awesome Meetings
lara
57
7k
How to Create Impact in a Changing Tech Landscape [PerfNow 2023]
tammyeverts
55
3.4k
Unsuck your backbone
ammeep
672
58k
Redefining SEO in the New Era of Traffic Generation
szymonslowik
1
330
The Organizational Zoo: Understanding Human Behavior Agility Through Metaphoric Constructive Conversations (based on the works of Arthur Shelley, Ph.D)
kimpetersen
PRO
0
360
Building an army of robots
kneath
306
46k
Google's AI Overviews - The New Search
badams
0
1k
Performance Is Good for Brains [We Love Speed 2024]
tammyeverts
12
1.7k
How GitHub (no longer) Works
holman
316
150k
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