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
起こりうる誤った推論/平均・分散・標準偏差・自由度 / Possible erroneous ...
Search
Kenji Saito
PRO
December 06, 2023
Business
0
170
起こりうる誤った推論/平均・分散・標準偏差・自由度 / Possible erroneous inferences, and mean, variance, standard deviation, degree of freedom
早稲田大学大学院経営管理研究科「企業データ分析」2023 冬の第3-4回で使用したスライドです。
Kenji Saito
PRO
December 06, 2023
Tweet
Share
More Decks by Kenji Saito
See All by Kenji Saito
FinTech 3-4 : Internet Technology and Governance
ks91
PRO
0
19
民主主義と博愛(Humanitarianism) / Democracy and Humanitarianism
ks91
PRO
0
1
ブロックチェーン概論 / Introduction to Blockchain
ks91
PRO
0
6
ブロックチェーンと分散ファイナンス概論 / Introduction to Blockchain and Decentralized Finance
ks91
PRO
0
47
Proof of Authenticity of General IoT Information with Tamper-Evident Sensors and Blockchain
ks91
PRO
0
5
FinTech 1-2 : Overview of FinTech
ks91
PRO
0
14
デジタルトランスフォーメーションと民主主義 / Digital Transformation and Democracy
ks91
PRO
0
19
We Never Took the Kobayashi Maru Test Until Now. What Do You Think of Our Solutions? — Journeys of the Mind Through a No-Win Game
ks91
PRO
0
24
思いつきが武器になる:研究というゲームを始めよう / Ideas Are Your Equipments : Let the Game of Research Begin!
ks91
PRO
0
79
Other Decks in Business
See All in Business
社内請負スクラムから脱却する〜複雑性に適応するスクラムチームの作り方〜
yasuhirokimesawa
1
120
LaiBlitz/corporateinformation
laiblitz
0
25k
コーポレートストーリー(新規投資家様向け会社説明資料)
gatechnologies
1
14k
【早わかり】アライドアーキテクツ
alliedarchitectsir
0
110
GVA TECH会社説明資料/GVA TECH_Pitch deck
gvatech2017
0
730
生成AIとデザインリサーチが融和する未来(RESEARCH Conference2025)
hynym
PRO
0
220
Team Topologies Second Edition - launch events - 25 September 2025
matthewskelton
PRO
0
470
Sustainability Report
kuradashi
0
25k
20250913_AWS アカウント 150 超の組織で取り組む Lambda EoL 対応
tsunojun
1
280
定義のない仕事 / Undefined Work
nrslib
10
4.7k
Infcurion Company Deck
infcurion
2
33k
アッテル会社紹介資料/culture deck
attelu
10
15k
Featured
See All Featured
4 Signs Your Business is Dying
shpigford
185
22k
Building Flexible Design Systems
yeseniaperezcruz
329
39k
Distributed Sagas: A Protocol for Coordinating Microservices
caitiem20
333
22k
Fight the Zombie Pattern Library - RWD Summit 2016
marcelosomers
234
17k
CSS Pre-Processors: Stylus, Less & Sass
bermonpainter
358
30k
Performance Is Good for Brains [We Love Speed 2024]
tammyeverts
12
1.2k
ピンチをチャンスに:未来をつくるプロダクトロードマップ #pmconf2020
aki_iinuma
127
53k
The Illustrated Children's Guide to Kubernetes
chrisshort
48
51k
Code Reviewing Like a Champion
maltzj
525
40k
[RailsConf 2023 Opening Keynote] The Magic of Rails
eileencodes
31
9.7k
Speed Design
sergeychernyshev
32
1.1k
No one is an island. Learnings from fostering a developers community.
thoeni
21
3.5k
Transcript
generated by Stable Diffusion XL v1.0 2023 3-4 (WBS) 2023
3-4 — 2023-12-07 – p.1/37
https://speakerdeck.com/ks91/collections/corporate-data-analysis-2023-winter 2023 3-4 — 2023-12-07 – p.2/37
( ) 1 11 30 • 2 11 30 (B
A ) • 3 12 7 • 4 12 7 • 5 12 14 6 12 14 t 7 12 21 2 ( ) t 8 12 21 2 ( ) t 9 1 11 P 10 1 11 11 1 18 12 1 18 13 1 25 14 1 25 W-IOI 2023 3-4 — 2023-12-07 – p.3/37
( 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/14 ) / (2 ) OK / 2023 3-4 — 2023-12-07 – p.4/37
(B A ) 1 ( ) 2 (Wilcoxon-Mann-Whitney ) 2023
3-4 — 2023-12-07 – p.5/37
3 1 ( ) 2 ( ) 1 2 4
σ2 σ s2 s df 2023 3-4 — 2023-12-07 – p.6/37
2023 3-4 — 2023-12-07 – p.7/37
1. (1) (2) 2023 12 3 ( ) 23:59 JST
( ) Waseda Moodle (Q & A ) 2023 3-4 — 2023-12-07 – p.8/37
. . . . . . 13(12) 11(10) (12/5( )
) ( ) R ( ) (1) 2023 3-4 — 2023-12-07 – p.9/37
(1) ( ) 2 1 ⇒ 1 2 (2) 95%
⇒ ( 6 ) 11 2 95% (← be ambitious!) 5% (← 2 ) 2023 3-4 — 2023-12-07 – p.10/37
0 2 4 6 8 10 0.0 0.1 0.2 0.3
0.4 0.5 0.6 ᳨ฟᅇᩘ ☜⋡ 2023 3-4 — 2023-12-07 – p.11/37
W GitHub Gist ⇒ RStudio Git GitHub https://github.com/ks91/cda-demo “cda-demo” RStudio
Git Git Dropbox “cda-demo” 2023 3-4 — 2023-12-07 – p.12/37
Git Git ( GPL) GitHub Git ( ) RStudio pull
Git (OS ) Linux : ( OK) macOS : ( OK) Windows : https://gitforwindows.org OK https://github.com/ks91/cda-demo ( ) 2023 3-4 — 2023-12-07 – p.13/37
S ⇒ D R ( ) × * ÷ /
xy x^y ( ) √ x sqrt(x) (function; ) ( 1 , 2 ,. . .) sqrt(9) + sqrt(16) <- ( ) ( ) x <- x + 1 x 1 ( ) 2023 3-4 — 2023-12-07 – p.14/37
R ( ) ⇒ D R " " T (true;
) F (false; ) c( 1 , 2 , . . .) ( ) 10 x x[1:3] 1 3 ( 1:100 1 100 ) a.b . . . . R R Source “ D.R” . . . ra <- sum(df[df$group == " ", "rank"]) ⇒ df group rank ra ( == ) 2023 3-4 — 2023-12-07 – p.15/37
“ D.R” ‘sum(. . .)’ # sum(df[df$group == " ",
"rank"]) ... <- 0 i <- 1 # while (i df ) { # if ((df i group ) == " ") { <- + (df i rank ) } i <- i + 1 } 2023 3-4 — 2023-12-07 – p.16/37
S ( ) ⇒ ↑ ( ) : Amazon PPT
Discord 2023 3-4 — 2023-12-07 – p.17/37
S 2 (A B ) ⇒ ( ) ( )
2023 3-4 — 2023-12-07 – p.18/37
S 1 1 1/6 5/6 1 1/6 ⇒ n 1
x ( n = 10 ) 2023 3-4 — 2023-12-07 – p.19/37
0 2 4 6 8 10 0.0 0.1 0.2 0.3
᳨ฟᅇᩘ ☜⋡ 2023 3-4 — 2023-12-07 – p.20/37
S A 5 B A ( ) A 5 B
A ( ) ( ) ( ) 1% 5 1/3 5 =0.41% 1% ⇒ n = 5 x = 5 x (1 3 )5 2023 3-4 — 2023-12-07 – p.21/37
0 1 2 3 4 5 0.0 0.1 0.2 0.3
᳨ฟᅇᩘ ☜⋡ 5% 2023 3-4 — 2023-12-07 – p.22/37
S 120g (120g ) 120g ⇒ 1kg 950g S 120g
· 120g 120g 2023 3-4 — 2023-12-07 – p.23/37
S ⇒ (p.84) χ2 H0 H0 [ ] RStudio Help
“chi” “chisq.test” 2023 3-4 — 2023-12-07 – p.24/37
χ2 1 6 (H0 ) # ( H_0 ) >
chisq.test(c(28, 33, 25, 35, 27, 32), p=c(1/6, 1/6, 1/6, 1/6, 1/6, 1/6)) # ( H_0 ) > chisq.test(c(42, 33, 25, 35, 27, 18), p=c(1/6, 1/6, 1/6, 1/6, 1/6, 1/6)) ‘chisq.test(. . .)’ ( ) ( ) ( ) ← R χ2 2023 3-4 — 2023-12-07 – p.25/37
K ⇒ 2023 3-4 — 2023-12-07 – p.26/37
. . . 2023 3-4 — 2023-12-07 – p.27/37
3 1 ( ) 2 ( ) 1 2 2023
3-4 — 2023-12-07 – p.28/37
100% 2 1 ( ( ) ) 2 ( (
) ) 2 1 1 α (α ) ( ) 2 β (β ) α n p 1 − β (power) 2023 3-4 — 2023-12-07 – p.29/37
3 “ .R” 3 bidist(n, p) : binull(n, p) :
5% bidistg(n, p0, p) : p0 p ( n = 20) p = 0.6 p = 0.2 p = 0.4 p = 0.8 p = 0.7 2023 3-4 — 2023-12-07 – p.30/37
0 5 10 15 20 0.00 0.05 0.10 0.15 0.20
᳨ฟᅇᩘ ☜⋡ 0 5 10 15 20 0.00 0.05 0.10 0.15 0.20 p = 0.2 2023 3-4 — 2023-12-07 – p.31/37
4 σ2 σ s2 s df 2023 3-4 — 2023-12-07
– p.32/37
(parameter; ) ( ) µ, σ2, σ (statistic) ( )
x, s2, s (degree of freedom) ( ) df = n− k 2023 3-4 — 2023-12-07 – p.33/37
E ( p.106) 8 “ E.R” R ‘var(. . .)’,
‘sd(. . .)’ x sqrt(sd(x)^2*(length(x) - 1)/length(x)) 2023 3-4 — 2023-12-07 – p.34/37
2023 3-4 — 2023-12-07 – p.35/37
2. 1 2 (1) 1 2 (2) 2023 12 10
( ) 23:59 JST ( ) Waseda Moodle (Q & A ) (1) Discord 2023 3-4 — 2023-12-07 – p.36/37
2023 3-4 — 2023-12-07 – p.37/37