R-错误的引用和变量设置
用户名
你好呀！
在下面的示例中，引用似乎存在问题。该代码重新组合了2v2游戏的象棋排名系统的计算。“数据”中的每一行都是游戏的结果
users表包含所有正在玩游戏的人。人们可以玩6类游戏：“ INT”，“ LKS”，“ SOD”，“ SJV”，“ LOY”和“ STA”。“性别”列表示具有0或1的男性/女性-永远不要更新此列。
数据文件在本文结尾处提供。这是我现在拥有的代码：
data <- read.csv("data.txt", header=F, quote="")
colnames(data) <- c("user", "p1","p2", "skill","win","looser","time")
data <- data[-which(data$user==data$p1),]
data <- data[-which(data$user==data$p2),]
users <- data.matrix(read.csv("users.txt", header = FALSE, row.names = 1))
colnames(users) <- c("sex", "INT", "LKS", "LOY", "SJV", "SOD", "STA")
for (i in 1:nrow(data)) {
game <- data[i,]
winner.old <- users[game$win, game$skill]
looser.old <- users[game$looser, game$skill]
winner.new <- winner.old + 32/2 * (1 - 0 + (1/2) * (looser.old-winner.old) / 200)
looser.new <- looser.old + 32/2 * (0 - 1 + (1/2) * (winner.old-looser.old) / 200)
users[game$win, game$skill] <- winner.new
users[game$looser, game$skill] <- looser.new
}
问题是
users[game$win, game$skill]
这似乎引用了错误的技能专栏。我试图在下图中显示问题。抱歉，这有点混乱-但我尝试对它进行颜色编码！此输出从i <-1生成。运行整个for循环，您会看到STA列显示为“未触及”-它始终使用应该使用的列中的左列。
数据 http://textuploader.com/o68x
users.txt http://textuploader.com/o68g
罗兰
因数在内部是整数，如果将它们用于子集，则使用内部表示形式：
DF <- data.frame(x=1:10)
DF$g <- c("b", "a")
# x g
# 1 1 b
# 2 2 a
# 3 3 b
# 4 4 a
# 5 5 b
# 6 6 a
# 7 7 b
# 8 8 a
# 9 9 b
# 10 10 a
col <- factor("g", levels=c("g", "x"))
DF[, col]
#[1] 1 2 3 4 5 6 7 8 9 10
as.integer(col)
#[1] 1
您需要将因子转换为字符以进行子设置：
DF[, as.character(col)]
#[1] "b" "a" "b" "a" "b" "a" "b" "a" "b" "a"
本文收集自互联网，转载请注明来源。
如有侵权，请联系 [email protected] 删除。
编辑于
相关文章
TOP 榜单
- 1
UITableView的项目向下滚动后更改颜色，然后快速备份
- 2
Linux的官方Adobe Flash存储库是否已过时？
- 3
用日期数据透视表和日期顺序查询
- 4
应用发明者仅从列表中选择一个随机项一次
- 5
Mac OS X更新后的GRUB 2问题
- 6
验证REST API参数
- 7
Java Eclipse中的错误13，如何解决？
- 8
带有错误“ where”条件的查询如何返回结果？
- 9
ggplot：对齐多个分面图-所有大小不同的分面
- 10
尝试反复更改屏幕上按钮的位置 - kotlin android studio
- 11
如何从视图一次更新多行（ASP.NET - Core）
- 12
计算数据帧中每行的NA
- 13
蓝屏死机没有修复解决方案
- 14
在 Python 2.7 中。如何从文件中读取特定文本并分配给变量
- 15
离子动态工具栏背景色
- 16
VB.net将2条特定行导出到DataGridView
- 17
通过 Git 在运行 Jenkins 作业时获取 ClassNotFoundException
- 18
在Windows 7中无法删除文件（2）
- 19
python中的boto3文件上传
- 20
当我尝试下载 StanfordNLP en 模型时，出现错误
- 21
Node.js中未捕获的异常错误，发生调用
我来说两句