3

在 R 2.13 上运行，我想有一个多列的 data.frame，第一个是数字类型，其他是字符类型。当我创建我的对象时，第一列的值正在以我不期望或不理解的方式进行转换。请看下面的代码。

tmp <- cbind(1:10,rep("aa",10))

时间

  [,1] [,2]
[1,] "1"  "aa"
[2,] "2"  "aa"
[3,] "3"  "aa"
[4,] "4"  "aa"
[5,] "5"  "aa"
[6,] "6"  "aa"
[7,] "7"  "aa"
[8,] "8"  "aa"
[9,] "9"  "aa"
[10,] "10" "aa"

tmp <- data.frame(tmp)

时间

   X1 X2
1   1 aa
2   2 aa
3   3 aa
4   4 aa
5   5 aa
6   6 aa
7   7 aa
8   8 aa
9   9 aa
10 10 aa

tmp[,1] <- as.numeric(tmp[,1])

时间

   X1 X2
1   1 aa
2   3 aa
3   4 aa
4   5 aa
5   6 aa
6   7 aa
7   8 aa
8   9 aa
9  10 aa
10  2 aa

出于某种原因，第一列的值正在发生变化。我必须在这里做一些明显错误的事情，有人可以指出我的解决方法吗？

4

2 回答 2

6 
> tmp <- data.frame(cbind(1:10,rep("aa",10)))
> str(tmp)
'data.frame':   10 obs. of  2 variables:
 $ X1: Factor w/ 10 levels "1","10","2","3",..: 1 3 4 5 6 7 8 9 10 2
 $ X2: Factor w/ 1 level "aa": 1 1 1 1 1 1 1 1 1 1

正如您在上面看到的，tmp$X1已转换为一个因素，这就是导致您所看到的行为的原因。

尝试：

tmp[,1] <- as.numeric(as.character(tmp[,1]))
于 2012-05-14T14:46:04.133 回答
5

@aix 的答案是正确的诊断。但是，您可能想要做的是直接创建一个数据框： 

data.frame(1:10,rep("aa",10))

而不是cbind先 ing （生成矩阵）然后转换为数据框。

data.frame您可能希望为变量提供合理的名称，而不是通过上面的命令（X1.10和）最终得到的奇怪名称rep..aa...10.：

data.frame(var1=1:10,var2=rep("aa",10))

由于data.frame复制了它的参数，您可以进一步缩短它：

data.frame(var1=1:10,var2="aa")

如果你真的想要一个字符向量而不是第二列的一个因子，你可以使用stringsAsFactors=FALSE或换var2行I()(ie var2=I("aa"))

于 2012-05-14T14:49:42.527 回答