Description Usage Arguments Examples
View source: R/my.doubles.bad.R
This function returns players' info from a serial record of pointing teams.
1 | my.doubles.bad(K, p = 21)
|
K |
is a vector of 1 or 2. |
p |
is the max point of a game. |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | K <- sample(1:2,42,replace=TRUE,prob=c(0.49,0.51))
K <- c(1,1,1,1,1,1,2,1,2,1,2,1,1,2,1,2,2,1,1,2,2,1,1,1,2,1,2,1,1,2,1,1)
K <- K * (-1) + 3
# The score sheet for this match : http://www.badminton.or.jp/nba/shinpan/scoresheet.pdf
doubles.score <- my.doubles.bad(K)
# <e3><83><9d><e3><82><a4><e3><83><b3><e3><83><88><e3><83><81><e3><83><bc><e3><83><a0><e8><a8><98><e9><8c><b2>
doubles.score$Point.team
# <e3><83><81><e3><83><bc><e3><83><a0><e5><88><a5><e7><b4><af><e7><a9><8d><e3><83><9d><e3><82><a4><e3><83><b3><e3><83><88><e3><83><ad><e3><82><b0>
doubles.score$Points
# <e3><82><b5><e3><83><bc><e3><83><90><e3><83><bc><e3><81><af><e8><aa><b0><e3><81><8b>
doubles.score$Server.4
# <e3><82><b5><e3><83><bc><e3><83><90><e3><83><bc><e3><83><bb><e3><83><ac><e3><82><b7><e3><83><bc><e3><83><90><e3><83><bc><e3><81><ae><e5><b7><a6><e5><8f><b3><e4><bd><8d><e7><bd><ae>
doubles.score$Server.side
# <e5><90><84><e3><83><81><e3><83><bc><e3><83><a0><e3><81><ae><e3><83><a1><e3><83><b3><e3><83><90><e3><83><bc><e3><81><ae><e4><bd><8d><e7><bd><ae>(<e5><88><9d><e6><9c><9f><e4><bd><8d><e7><bd><ae><e3><81><8b><e3><81><9d><e3><81><ae><e9><80><86><e3><81><8b>)
doubles.score$Location
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.