R:数字向量在日期绑定后变为非数字

Question

在我的例子中，我有一个数字向量（future_prices）。我使用来自另一个向量的日期向量（此处：pred_commodity_prices$futuredays）来创建月份的数字。之后，我使用 cbind 将月份绑定到数字向量。但是，发生了数字向量变为非数字的情况。你知道这是什么原因吗？当我使用 as.numeric（future_prices） 时，我得到奇怪的值。还有什么替代方案？谢谢

head(future_prices)
pred_peak_month_3a pred_peak_quarter_3a 
1           68.33907             62.37888
2           68.08553             62.32658
is.numeric(future_prices)
[1] TRUE
> month = format(as.POSIXlt.date(pred_commodity_prices$futuredays), "%m")
> future_prices <- cbind (future_prices, month)
> head(future_prices)
  pred_peak_month_3a     pred_peak_quarter_3a   month
  1 "68.3390747063745"   "62.3788824938719"     "01"
 is.numeric(future_prices)
 [1] FALSE 

Answer 1

原因是cbind返回一个矩阵，而一个矩阵只能保存一种数据类型。您可以改用data.frame：

n <- 1:10
b <- LETTERS[1:10]
m <- cbind(n,b)
str(m)
 chr [1:10, 1:2] "1" "2" "3" "4" "5" "6" "7" "8" "9" ...
 - attr(*, "dimnames")=List of 2
  ..$ : NULL
  ..$ : chr [1:2] "n" "b"
d <- data.frame(n,b)
str(d)
'data.frame':   10 obs. of  2 variables:
 $ n: int  1 2 3 4 5 6 7 8 9 10
 $ b: Factor w/ 10 levels "A","B","C","D",..: 1 2 3 4 5 6 7 8 9 10

Answer 2

请参阅?format 。 format函数返回：

与包含字符的"x"结构相似的对象 第一个参数 'x' 的元素表示 通用格式，并采用当前区域设置的编码。

从 ?cbind ， cbind 返回

。组合"..."的矩阵参数 按列或按行。 （例外：如果没有输入或 所有输入均为"空"，值为"空"。

并且矩阵的所有元素都必须属于同一类，因此一切都被强制为字符。

Answer 3

F.Y.I.
当一列是"因子"时，简单地/直接使用 as.numeric 将更改该列中的值。正确的方法是：

data.frame[,2] <- as.numeric(as.character(data.frame[,2]))

查找更多详细信息：将值转换为数字、堆栈溢出