Tweet
Tweet

Slide 1

Slide 1 text

generated by Stable Diffusion XL v1.0 2023 5 (WBS) 2023 5 — 2023-12 – p.1/16

Slide 2

Slide 2 text

https://speakerdeck.com/ks91/collections/corporate-data-analysis-2023-winter 2023 5 — 2023-12 – p.2/16

Slide 3

Slide 3 text

( 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

Slide 4

Slide 4 text

RStudio Git ( ) 2 2023 5 — 2023-12 – p.4/16

Slide 5

Slide 5 text

RStudio Git ( ) RStudio Git Git ( GPL) GitHub Git ( ) RStudio pull 2023 5 — 2023-12 – p.5/16

Slide 6

Slide 6 text

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

Slide 7

Slide 7 text

(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

Slide 8

Slide 8 text

“ .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

Slide 9

Slide 9 text

0 20 40 60 80 100 0 20 40 60 80 100 ṇࡢ┦㛵ࡢ౛ ⱥㄒࡢヨ㦂⤖ᯝ ᩘᏛࡢヨ㦂⤖ᯝ 2023 5 — 2023-12 – p.9/16

Slide 10

Slide 10 text

“ .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

Slide 11

Slide 11 text

0 5 10 15 20 13 14 15 16 17 18 ㈇ࡢ┦㛵ࡢ౛ 㐌ᙜࡓࡾࡢㄢእ㐠ື᫬㛫 100m㉮ࡢࢱ࢖࣒ (⛊) 2023 5 — 2023-12 – p.11/16

Slide 12

Slide 12 text

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

Slide 13

Slide 13 text

0 20 40 60 80 100 13 14 15 16 17 18 ↓┦㛵ࡢ౛ ⱥㄒࡢヨ㦂⤖ᯝ 100m㉮ࡢࢱ࢖࣒ (⛊) 2023 5 — 2023-12 – p.13/16

Slide 14

Slide 14 text

3 1 2 3 3 <- data.frame( = 1$ , = 1$ , = 2$ , = 2$ ) plot( 3) 2 12 : plot 2023 5 — 2023-12 – p.14/16

Slide 15

Slide 15 text

ⱥㄒ 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

Slide 16

Slide 16 text

2023 5 — 2023-12 – p.16/16