R: numeric vector becoming non-numeric after cbind of dates

Question

I have a numeric vector (future_prices) in my case. I use a date vector from another vector (here: pred_commodity_prices$futuredays) to create numbers for the months. After that I use cbind to bind the months to the numeric vector. However, was happened is that the numeric vector become non-numeric. Do you know how what the reason for this is? When I use as.numeric(future_prices) I get strange values. What could be an alternative? Thanks

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

score 29 · Accepted Answer · answered Jun 22 '12 at 06:49

The reason is that cbind returns a matrix, and a matrix can only hold one data type. You could use a data.frame instead:

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

score 3 · Answer 2 · answered Jun 22 '12 at 06:48

See ?format. The format function returns:

An object of similar structure to ‘x’ containing character representations of the elements of the first argument ‘x’ in a common format, and in the current locale's encoding.

from ?cbind, cbind returns

... a matrix combining the ‘...’ arguments column-wise or row-wise. (Exception: if there are no inputs or all the inputs are ‘NULL’, the value is ‘NULL’.)

and all elements of a matrix must be of the same class, so everything is coerced to character.

I know you like the data.frame solution, but if you wanted to use a matrix you could coerce your `month` to numeric: `as.numeric(month)` and all your data would be numeric. — GSee, Jun 22 '12 at 07:01

score -1 · Answer 3 · answered Feb 19 '18 at 23:30

-1

F.Y.I.
When one column is "factor", simply/directly using as.numeric will change the value in that column. The proper way is:

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

Find more details: Converting values to numeric, stack overflow

answered Feb 19 '18 at 23:30

Guannan Shen

649
8
12

This is just for more information. Johannes has already well answered this question. – Guannan Shen Feb 20 '18 at 00:33

R: numeric vector becoming non-numeric after cbind of dates

3 Answers3