Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/70.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
当我尝试遍历R中的一行数据帧并将值放入向量中时,值最终会发生变化。是什么原因造成的?_R_Loops_Dataframe_Vector - Fatal编程技术网

当我尝试遍历R中的一行数据帧并将值放入向量中时,值最终会发生变化。是什么原因造成的?

当我尝试遍历R中的一行数据帧并将值放入向量中时,值最终会发生变化。是什么原因造成的?,r,loops,dataframe,vector,R,Loops,Dataframe,Vector,我想遍历R中的一个数据帧,并将每个值放在一个单独的数字向量中。如您所见,在原始数据帧中(称为singaporeINF,请参见第一张照片),值都在3000到4000之间 但是,当我使用下面的代码迭代并提取值时: singaporeVector <- numeric() for (i in singaporeINF){ singaporeVector <- append(singaporeVector, i) } print(singaporeVector) 发生了什么事?为什么

我想遍历R中的一个数据帧,并将每个值放在一个单独的数字向量中。如您所见,在原始数据帧中(称为singaporeINF,请参见第一张照片),值都在3000到4000之间

但是,当我使用下面的代码迭代并提取值时:

singaporeVector <- numeric()
for (i in singaporeINF){
  singaporeVector <- append(singaporeVector, i)
}
print(singaporeVector)
发生了什么事?为什么值从3000变为10或8


我的回答最好设置为评论,但我缺乏这样做的声誉

检查那些值在数据框中是什么,它们似乎有一个空格,这可能意味着这些值要么是字符,要么更可能是因子。试一试

singaporeVector <- numeric()
for (i in singaporeINF){
singaporeVector <- append(as.numeric(as.character(singaporeINF)), i)
}
print(singaporeVector)

singaporeVector我猜你的数字是作为因子存储的。尝试
append(新加坡向量,as.numeric(as.character(i))
append(新加坡向量,as.numeric(gsub(“,”,as.character(i)))
singaporeVector <- numeric()
for (i in singaporeINF){
singaporeVector <- append(as.numeric(as.character(singaporeINF)), i)
}
print(singaporeVector)
singaporeVector <- as.numeric(as.character(singaporeINF[1,]))