Как заполнить пропущенные значения нулем, а затем создать фрейм данных из другого типа выходных данных?

Question

Я получаю такой вывод после запуска моего кода.

Это v1 - почасовые данные за январь 2011 года. Когда мы смотрим на кластер 1, мы видим день, сезон и год, а затем есть значения (hour_1, hour_2 et c.) Для 1/1/2011 и 2/1/2011. И это продолжается, как кластер 1, кластер 2 и т. Д. c ..

. Как видно из результатов, дневное значение для 1/1/2011 и 2/1/2011 составляет 1,48 и 2,53, а для 7/1/2011 и 8/1/2011 0,19 и 0,75. Значения остальных дней равны нулю.

Итак, я хочу получить почасовые значения за январь 2011 года (с 01.01.2011 по 31.01.2011). У меня уже есть почасовые значения для 1-2-7-8 / 1/2011, а затем я хочу добавить нули для других дней в виде почасовой формы.

..

Вот структура моего вывода;

   v1<-structure(list(`Cluster 1` = structure(list(Day = c(1, 2), Season = c(1, 
1), Year = c(2011, 2011), Daily = c(1.48, 2.53), Hour_1 = c(0, 
1.07), Hour_2 = c(0, 0), Hour_3 = c(0, 0), Hour_4 = c(0, 0), 
    Hour_5 = c(0, 0), Hour_6 = c(0, 1.27), Hour_7 = c(0, 0.19
    ), Hour_8 = c(0, 0), Hour_9 = c(0, 0), Hour_10 = c(0, 0), 
    Hour_11 = c(0, 0), Hour_12 = c(0, 0), Hour_13 = c(0, 0), 
    Hour_14 = c(0, 0), Hour_15 = c(0, 0), Hour_16 = c(0, 0), 
    Hour_17 = c(0, 0), Hour_18 = c(0.041, 0), Hour_19 = c(0.673, 
    0), Hour_20 = c(0, 0), Hour_21 = c(0, 0), Hour_22 = c(0, 
    0), Hour_23 = c(0.319, 0), Hour_24 = c(0.447, 0)), .Names = c("Day", 
"Season", "Year", "Daily", "Hour_1", "Hour_2", "Hour_3", "Hour_4", 
"Hour_5", "Hour_6", "Hour_7", "Hour_8", "Hour_9", "Hour_10", 
"Hour_11", "Hour_12", "Hour_13", "Hour_14", "Hour_15", "Hour_16", 
"Hour_17", "Hour_18", "Hour_19", "Hour_20", "Hour_21", "Hour_22", 
"Hour_23", "Hour_24"), row.names = c("Day_1", "Day_2"), class = "data.frame"), 
    `Cluster 2` = structure(list(Day = c(7, 8), Season = c(1, 
    1), Year = c(2011, 2011), Daily = c(0.19, 0.75), Hour_1 = c(0, 
    0), Hour_2 = c(0, 0.521), Hour_3 = c(0, 0.229), Hour_4 = c(0, 
    0), Hour_5 = c(0, 0), Hour_6 = c(0, 0), Hour_7 = c(0, 0), 
        Hour_8 = c(0, 0), Hour_9 = c(0, 0), Hour_10 = c(0, 0), 
        Hour_11 = c(0, 0), Hour_12 = c(0, 0), Hour_13 = c(0, 
        0), Hour_14 = c(0, 0), Hour_15 = c(0, 0), Hour_16 = c(0, 
        0), Hour_17 = c(0.189, 0), Hour_18 = c(0.001, 0), Hour_19 = c(0, 
        0), Hour_20 = c(0, 0), Hour_21 = c(0, 0), Hour_22 = c(0, 
        0), Hour_23 = c(0, 0), Hour_24 = c(0, 0)), .Names = c("Day", 
    "Season", "Year", "Daily", "Hour_1", "Hour_2", "Hour_3", 
    "Hour_4", "Hour_5", "Hour_6", "Hour_7", "Hour_8", "Hour_9", 
    "Hour_10", "Hour_11", "Hour_12", "Hour_13", "Hour_14", "Hour_15", 
    "Hour_16", "Hour_17", "Hour_18", "Hour_19", "Hour_20", "Hour_21", 
    "Hour_22", "Hour_23", "Hour_24"), row.names = c("Day_3", 
    "Day_4"), class = "data.frame")), .Names = c("Cluster 1", 
"Cluster 2"))