2016-04-26 157 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