Cbind не работает, как ожидалось. Объект временного ряда R

Question

Исходный набор данных

test_data1
         Date Quantity Discount Segment Ship_Mode
1  2018-02-01      345     5000      20        20
2  2018-03-01      500      300      50        20
3  2018-04-01      400      400      40        30
4  2018-05-01      200      400     100        20

Теперь я создал манекены для сезонности с именем dummy_test

   dummy_test<- seasonaldummy(test_data1)
       Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov
 [1,]   0   1   0   0   0   0   0   0   0   0   0
 [2,]   0   0   1   0   0   0   0   0   0   0   0
 [3,]   0   0   0   1   0   0   0   0   0   0   0
 [4,]   0   0   0   0   1   0   0   0   0   0   0

Я пытаюсь объединить 2 кадра данных, чтобы у меня был объединенный кадр данных, который имеет обе сезонности манекены и другие колонны. (хотите объединить 2-4 столбцы test_data1

cbind(dummy_test,test_data1[,c(2:4)])
Error in .cbind.ts(list(...), .makeNamesTs(...), dframe = FALSE, union = TRUE) : 
  non-time series not of the correct length

Структура

sapply(test_data1,class)
 Quantity  Discount   Segment Ship_Mode 
     "ts"      "ts"      "ts"      "ts"