library(reshape2) d.melt <- melt(d, measure.vars = c("自チームの10分あたりのTOUCH数", "相手チームの10分あたりのTOUCH数"), variable.name = "チーム", value.name = "TOUCH数" ) library(ggplot2) g <- ggplot( d.melt, aes( x=d.melt$"チーム", y=d.…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。