2016-04-26 171 views

回答

0

我再試一次:

讓我們創建沿線的矩陣你有什麼:

new <- matrix(data = NA, nrow = 2, ncol = 2) 
new[1,] <- c("Tue", "Wed") 
new[2,] <- c(1, 2) 

現在,讓我們通過我們已經拿到了兩行合併,從而創建一個新的向量:

newer <- paste0(new[1,], new[2,]) 

現在我們可以綁定該到我們矩陣的底部:

new <- rbind(new, newer) 

這是否做你所需要的?

+0

謝謝!它做了。 =) – OmegaSupreme

+0

不客氣:) – rosscova

1

我在這裏已經實施了類似的事情,使用「day.of.week」功能*採取的日期一欄,並返回的「星期幾」列:

output$day <- ifelse(is.na(output$date), NA, 
          day.of.week(as.integer(substr(as.character(output$date), 6, 7)), 
             as.integer(substr(as.character(output$date), 9, 10)), 
             as.integer(substr(as.character(output$date), 1, 4)) 
          ) + 1L) 
day.values <- c("Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday") 
output$day <- day.values[ output$day ] 

注意我已經把它放到了一個ifelse中,以避免試圖計算一週中的空白或NA域。

基本上,chron中的「day.of.week」函數(因此請確保您正在運行chron包)爲每個日期返回1到7之間的值。然後使用1-7值從名爲「day.values」的列表中提取「day」的文本值。

  • 注意輸入 「day.of.week」 的格式爲(年,月,日),即2016年4月26日:

    day.of.week(2016, 04, 26) 
    

    我的代碼正在輸入的日期在 「日期」 格式,這意味着它看起來像:

    2016-04-26 
    
+0

等等,我剛剛重讀了你的問題,我可能已經回答了你所問的事情,但實際上是完全不同的東西。對不起,如果是這樣的話,我很困惑:P – rosscova

+0

這很酷。我的問題很混亂(在我的手機上自動更正-_-)。但我已經可以告訴你做了一個新專欄。但你確實給了我一個想法。謝謝。 – OmegaSupreme