ONLY DO WHAT ONLY YOU CAN DO

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

散布図

R で 散布図行列 ~少年サッカー データ分析~

個人別の指標と、チームの得失点との間に相関があるか調べてみた setwd("e:/data") d <- read.table("stats.txt", header=T) library(ggplot2) library(GGally) ggpairs( d[, c( "山岡_タッチ", "山岡_パス出", "山岡_パス受", "山岡_保持", "山岡_奪取", "…

R で 散布図行列 ~少年サッカー データ分析~

library(psych) psych::pairs.panels(d[,c( "自チームの10分あたりのTOUCH数", "相手チームの10分あたりのTOUCH数", "自チームと相手チームのTOUCH数比率", "自チームの10分あたりの得点", "自チームの10分あたりの失点", "自チームの10分あたりの得失点" )]…

R で 散布図 確率密度図 ~少年サッカー データ分析~

散布図 g <- ggplot(d4, aes(x=d4$"奪取",y=d4$"X10分あたりの得失",color=d4$"勝敗",fill=d4$"勝敗")) g <- g+geom_point(size=1, alpha=0.5) plot(g) 回帰直線を引いてみる g <- ggplot(d4, aes(x=d4$"奪取",y=d4$"X10分あたりの得失")) g <- g + geom_poi…

R で 散布図行列 ~少年サッカー データ分析~

自分用のメモ(後で整理する) setwd("C:/pass/data") d <- read.table("stats4.txt", header=T) > colnames(d) [1] "年度" "日付" [3] "大会" "時間" [5] "自チーム名" "相手チーム名" [7] "自チーム.10分あたりのTOUCH数" "相手チーム.10分あたりのTOUCH数…