假设我有一个由10名球员(球员)组成的足球队,我应该从中制作两个子团队,每队5人,然后计算每个团队的总分.
players <- read.table(text=
"paul 3
ringo 3
george 5
john 5
mick 1
ron 2
charlie 3
ozzy 5
keith 3
brian 3", as.is=TRUE)
Run Code Online (Sandbox Code Playgroud)
我已经提取了一组随机的5名玩家:
t1 <- sample(players$V1, size = 5)
Run Code Online (Sandbox Code Playgroud)
但是要创建第二支球队(不包括第一支球员)并计算两支球队的总得分,我已完成封锁.