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
RBC202003_Day2_Period5
Search
sakaue
March 20, 2020
Education
0
40
RBC202003_Day2_Period5
sakaue
March 20, 2020
Tweet
Share
More Decks by sakaue
See All by sakaue
SappoRo.R #11「R によるThe Multilingual Eye-tracking COrpus (MECO) の探索的データ分析」
sakaue
0
96
RBC202003_Day2_Period6
sakaue
0
94
RBC202003_Day2_Period7
sakaue
0
91
Rbootcamp202003_Day2_p8.pdf
sakaue
0
82
RBC202003_Day1_Period1
sakaue
1
72
RBC202003_Day1_Period2
sakaue
0
71
RBC202003_Day1_Period3
sakaue
0
93
RBC202003_Day1_Period4
sakaue
0
55
Other Decks in Education
See All in Education
株式会社アイエスエイ 会社概要
recruit_isa
0
110
EVOLUCIÓN DE LAS NEUROCIENCIAS EN LOS CONTEXTOS ORGANIZACIONALES
jvpcubias
0
180
生成AI活用セミナー/GAI-workshop
gnutar
0
120
20250625_なんでもCopilot 一年の振り返り
ponponmikankan
0
390
Master of Applied Science & Engineering: Computer Science & Master of Science in Applied Informatics: Artificial Intelligence and Data Science
signer
PRO
0
830
万博マニアックマップを支えるオープンデータとその裏側
barsaka2
0
910
(2025) L'origami, mieux que la règle et le compas
mansuy
0
150
吉岡研究室紹介(2025年度)
kentaroy47
0
350
2025年度春学期 統計学 第13回 不確かな測定の不確かさを測る ー 不偏分散とt分布 (2025. 7. 3)
akiraasano
PRO
0
140
HCI and Interaction Design - Lecture 2 - Human-Computer Interaction (1023841ANR)
signer
PRO
0
1.3k
生成AIとの付き合い方 / Generative AI and us
kaityo256
PRO
10
1.7k
QR-koodit opetuksessa
matleenalaakso
0
1.7k
Featured
See All Featured
Evolution of real-time – Irina Nazarova, EuRuKo, 2024
irinanazarova
9
980
The Illustrated Children's Guide to Kubernetes
chrisshort
49
51k
Imperfection Machines: The Place of Print at Facebook
scottboms
269
13k
Building Better People: How to give real-time feedback that sticks.
wjessup
369
20k
Facilitating Awesome Meetings
lara
56
6.6k
KATA
mclloyd
32
15k
What’s in a name? Adding method to the madness
productmarketing
PRO
24
3.7k
Responsive Adventures: Dirty Tricks From The Dark Corners of Front-End
smashingmag
252
22k
Performance Is Good for Brains [We Love Speed 2024]
tammyeverts
12
1.2k
StorybookのUI Testing Handbookを読んだ
zakiyama
31
6.2k
Fireside Chat
paigeccino
40
3.7k
Chrome DevTools: State of the Union 2024 - Debugging React & Beyond
addyosmani
8
910
Transcript
2020-03-20 ୈ5ݶ σʔλͷཁ bootcamp
Agenda 1. σʔλͷཁͷඞཁੑ (5) 2. ϕΫτϧΛͬͨཁ (20) 3. ߦྻΛͬͨཁ (20)
4. ԋशʹ͙࣍ԋश (45)
Agenda 1. σʔλͷཁͷඞཁੑ (5) 2. ϕΫτϧΛͬͨཁ (20) 3. ߦྻΛͬͨཁ (20)
4. ԋशʹ͙࣍ԋश (45)
1. σʔλͷཁͷඞཁੑ • σʔλΛूΊ͚ͨͩͰԿஅͰ͖ͳ͍ • σʔλΛཁʢཁʣΛ͢Δ͜ͱͰɼશମ͕ Ͳ͏ͳ͍ͬͯͯɼΒ͖͕ͭͲ͏ͳ͍ͬͯ Δ͔͕ѲͰ͖Δ • தؒςετͰऔͬͨ55ྑ͍ʁɼѱ͍ʁ
• ظςετͷฏۉ͕80ͷ߹ɼશମతʹྑ͍Ͱ͖͙͍͋ʁ • ฏۉɾΒ͖ͭʢSDʣʹΑΔʢ͠ɼςετͷ༰ ʹΑΔʢ͠ɼԿΛ͔֬Ί͍͔ͨʹΑΔʣʣ
Agenda 1. σʔλͷཁͷඞཁੑ (5) 2. ϕΫτϧΛͬͨཁ (20) 3. ߦྻΛͬͨཁ (20)
4. ԋशʹ͙࣍ԋश (45)
Agenda 1. σʔλͷཁͷඞཁੑ (5) 2. ϕΫτϧΛͬͨཁ (20) 3. ߦྻΛͬͨཁ (20)
4. ԋशʹ͙࣍ԋश (45)
• sum() ؔ • x <- c(1, 2, 3, 4,
5) • sum(x) • sum(x[2 : 4]) • ϕΫτϧͷ2൪͔Β4൪ͷཁૉͷ૯ • y <- c(1:1000) • sum(y) • sum(y[27:89]) 2. ϕΫτϧΛͬͨཁ
• mean() ؔ: ฏۉΛٻΊΔ • ฏۉ: σʔλͷ૯ΛσʔλͷݸͰׂͬͨ • mean(x); mean(y)
• median() ؔ: தԝΛٻΊΔ • தԝ: খ͍͞ॱʹฒͨ࣌ʹਅΜதͷॱҐʹ͘Δ • median(x); median(y) • ฏۉͷ᠘ • ۃͳ͕ࠞ͟ΔͱӨڹΛड͚ͯ͠·͏ • a <- c(100, 200, 300, 400, 500) • mean(a); median(a) • b <- c(100, 200, 300, 400, 5000) • mean(b); median(b) 2. ϕΫτϧΛͬͨཁ
• max() ؔ: ࠷େΛٻΊΔ • min() ؔ: ࠷খΛٻΊΔ • var()
ؔ: ࢄΛٻΊΔ • sd() ؔ: ඪ४ภࠩΛٻΊΔ • summary() ؔ: ཁ౷ܭྔΛҰʹٻΊΔ • ࠷খ, தԝ, ฏۉ, ࠷େ, Լଆ25%, ্ଆ25% • max(x); max(y) • min(x); min(y) • var(x);var(y) • sd(x); sd(y) • summary(x); summary(y) 2. ϕΫτϧΛͬͨཁ
Agenda 1. σʔλͷཁͷඞཁੑ (5) 2. ϕΫτϧΛͬͨཁ (20) 3. ߦྻΛͬͨཁ (20)
4. ԋशʹ͙࣍ԋश (45)
Agenda 1. σʔλͷཁͷඞཁੑ (5) 2. ϕΫτϧΛͬͨཁ (20) 3. ߦྻΛͬͨཁ (20)
4. ԋशʹ͙࣍ԋश (45)
3. ߦྻΛͬͨཁ • ѻ͍ํϕΫτϧͷཁͱಉ͡ • matrix.4 <- matrix(c(1, 2, 3,
4, 5, 6, 7, 8, 9), nrow = 3, ncol = 3, byrow = TRUE) • matrix.4 ͰதΛ֬ೝ • sum(matrix.4) #ߦྻʹ͋Δͷ૯ • mean(matrix.4) #ߦྻશମͷฏۉ • sum(matrix.4[1,]) #ߦྻ1ߦͷ૯ • mean(matrix.4[,2:3]) #ߦྻ2-3ྻͷฏۉ
3. ߦྻΛͬͨཁ • ͪΐͬͱɾཁૉΛେ͖ͯ͘͠Έ·͠ΐ͏ • matrix.5 <- matrix(c(1:5000), nrow =
100, ncol = 50, byrow = TRUE) • matrix.5 ͰதΛ֬ೝ • sum(matrix.5) #ߦྻʹ͋Δͷ૯ • mean(matrix.5) #ߦྻશମͷฏۉ
3. ߦྻΛͬͨཁ • rowSums() ؔ; colSums() ؔ; • ߦ͝ͱྻ͝ͱʹ૯ΛٻΊΔؔ •
rowSums(matrix.4); rowSums(matrix.5) • colSums(matrix.4); colSums(matrix.5) • rowMeans () ؔ; colMeans() ؔ • ߦ͝ͱྻ͝ͱʹฏۉΛٻΊΔؔ • rowMeans(matrix.4); rowMeans(matrix.5) • colMeans(matrix.4); colMeans(matrix.5)
3. ߦྻΛͬͨཁ • apply() ؔ • ߦ͝ͱྻ͝ͱʹ༷ʑͳؔΛద༻ • apply(ߦྻ໊, Ϛʔδϯ,
ద༻͢Δؔʣ • Ϛʔδϯ͕1ͳΒߦ͝ͱɼ2ͳΒྻ͝ͱ • apply(matrix.4, 1, sum) #ߦ͝ͱͷ૯ • rowSums(matrix.4) ͱಉ͡ॲཧ • apply(matrix.4, 2, mean) #ྻ͝ͱͷฏۉ • colMeans(matrix.4) ͱಉ͡ॲཧ
3. ߦྻΛͬͨཁ • apply() ؔͷଓ͖ • apply(matrix.4, 1, max) •
#ߦ͝ͱͷ࠷େ • apply(matrix.4, 2, summary) • #ྻ͝ͱͷཁ౷ܭྔ
Agenda 1. σʔλͷཁͷඞཁੑ (5) 2. ϕΫτϧΛͬͨཁ (20) 3. ߦྻΛͬͨཁ (20)
4. ԋशʹ͙࣍ԋश (45)
Agenda 1. σʔλͷཁͷඞཁੑ (5) 2. ϕΫτϧΛͬͨཁ (20) 3. ߦྻΛͬͨཁ (20)
4. ԋशʹ͙࣍ԋश (45)
4. ԋशʹ͙࣍ԋश 1. 1͔Β50͔Β·Ͱͷ͕ೖͬͨϕΫτ ϧΛ࡞ͯ͠… 1. ૯, ฏۉ, தԝ, ࠷େ,
࠷খ , ࢄ, ඪ४ภࠩΛٻΊΔ 2. ཁ౷ܭྔΛٻΊΔ
4. ԋशʹ͙࣍ԋशʢώϯτʣ 1. Λൃੜͤ͞ΔʹίϩϯΛ͍·͠ΐ͏ 1. ֤ؔΛηϛίϩϯͰͭͳ͍ͰҰؾʹ࣮ߦ 2. summary() ؔΛ͍·͢
2. 1͔Β10000·Ͱͷ͕ೖͬͨߦྻʢ100ߦɾ100ྻʣΛ࡞ͯ͠… 1. 20ߦʮͱʯ70ߦͷ2ߦͷΈͷ֤૯ΛٻΊΔ 2. 31ྻʮ͔Βʯ80ྻ·Ͱͷ50ྻͷ֤ฏۉΛٻΊΔ 3. ߦ͝ͱɾྻ͝ͱͷ૯ΛٻΊΔʢapply ؔΛ༻ʣ 4.
ߦ͝ͱɾྻ͝ͱͷฏۉΛٻΊΔʢapply ؔΛ༻ʣ 5. ߦ͝ͱɾྻ͝ͱͷཁ౷ܭྔΛٻΊΔʢapply ؔΛ༻ʣ 6. psych ύοέʔδΛͬͯཁ౷ܭྔΛٻΊΔ • ҙͷߦɾྻʹରͯ͠ٻΊͯΈΔ 4. ԋशʹ͙࣍ԋश
2. matrix() ؔΛ͍ɼྻͷࢦఆͱ byrow ͷઃఆʹ༻৺ 1. ߦͷෳࢦఆ c() ؔΛ͍·͠ΐ͏ 2.
ྻͷൣғࢦఆίϩϯΛ͍·͠ΐ͏ 3. apply() ؔͱ sum() ؔΛΈ߹Θͤ·͠ΐ͏ 4. apply() ؔͱ mean() ؔΛΈ߹Θͤ·͠ΐ͏ 5. apply() ؔͷߦͱྻͷࢦఆɼ1 ͔ 2 Ͱ͚·͢ 6. ·ͣ install.packages() ͯ͠ library() Ͱ༗ޮԽ 4. ԋशʹ͙࣍ԋशʢώϯτʣ
Enjoy ! twitter: @sakaue e-mail: tsakaue<AT>hiroshima-u.ac.jp