ONLY DO WHAT ONLY YOU CAN DO

こけたら立ちなはれ 立ったら歩きなはれ

2018-04-01から1ヶ月間の記事一覧

R で ヒストグラム ~少年サッカー データ分析~

open color を参考に色を指定する yeun.github.io RED_5 <- "#ff6b6b" PINK_5 <- "#f06595" GRAPE_5 <- "#cc5de8" VIOLET_5 <- "#845ef7" INDIGO_5 <- "#5c7cfa" BLUE_5 <- "#339af0" CYAN_5 <- "#22b8cf" TEAL_5 <- "#20c997" GREEN_5 <- "#51cf66" LIME_5 …

R で ヒストグラム ~少年サッカー データ分析~

グラフを並べられる facet_wrap というのを使ってみた setwd("e:/data") d <- read.table("stats_all.txt", header=T) # ggplot2 パッケージを使用 library(ggplot2) g <- ggplot(d) g <- g + geom_histogram( aes( x=d$"自チーム.10分あたりのTOUCH数", col…

R で ピラミッド図 ~少年サッカー データ分析~

データ読み込み setwd("e:/data") d <- read.table("stats_all.txt", header=T) 度数分布を得る d_win <- subset(d, 勝敗=="勝") h_win <- hist(d_win$"自チーム.TOUCH数", breaks=seq(0, 600, 50)) > h_win $breaks [1] 0 50 100 150 200 250 300 350 400 4…