r:baseball_data
Differences
This shows you the differences between two versions of the page.
Both sides previous revisionPrevious revisionNext revision | Previous revision | ||
r:baseball_data [2017/06/05 08:52] – hkimscil | r:baseball_data [2019/09/18 08:00] (current) – hkimscil | ||
---|---|---|---|
Line 1: | Line 1: | ||
+ | http:// | ||
+ | http:// | ||
+ | |||
{{: | {{: | ||
{{: | {{: | ||
Line 27: | Line 30: | ||
text(x=bp*1.01, | text(x=bp*1.01, | ||
| | ||
+ | |||
+ | dev.copy(png, | ||
+ | dev.off() | ||
+ | |||
</ | </ | ||
+ | |||
+ | {{: | ||
+ | |||
+ | 나이팅게일 챠트 | ||
+ | < | ||
+ | data <- read.csv(" | ||
+ | data | ||
+ | |||
+ | row.names(data) <- data$선수명 | ||
+ | data2 <- data[, | ||
+ | stars(data2, | ||
+ | | ||
+ | dev.copy(png, | ||
+ | dev.off() | ||
+ | |||
+ | |||
+ | label <- names(data2) | ||
+ | val <- table(label) | ||
+ | color <- c(" | ||
+ | pie(val, | ||
+ | dev.copy(png, | ||
+ | dev.off() | ||
+ | </ | ||
+ | |||
+ | {{: | ||
+ | {{: | ||
+ | |||
+ | < | ||
+ | # | ||
+ | |||
+ | data4 <- data[, | ||
+ | data4 | ||
+ | line1 <- data$연봉대비출루율 | ||
+ | line2 <- data$연봉대비타점율 | ||
+ | | ||
+ | par(mar=c(5, | ||
+ | |||
+ | plot(line1, | ||
+ | | ||
+ | | ||
+ | axis(1, | ||
+ | axis(2, | ||
+ | par(new=T) | ||
+ | | ||
+ | plot(line2, | ||
+ | axis(4, | ||
+ | mtext(side=4, | ||
+ | mtext(side=2, | ||
+ | |||
+ | abline(h=seq(0, | ||
+ | |||
+ | legend(18, | ||
+ | |||
+ | </ | ||
+ | {{: | ||
+ | |||
+ | {{tag> statistics r " | ||
r/baseball_data.1496622150.txt.gz · Last modified: 2017/06/05 08:52 by hkimscil