Question

我正在尝试安排生存数据以便在MARK中使用，因此我希望将每一列连接成一个新列，而不会将值分开。

数据框中的数据样本：

  Tag      31/08/2010 18/09/2012 3/09/2013    
 9851          1          0         0    
 3875          1          0         1      
 0922          0          1         0        
 9192          0          1         0

这是有效的，也是我想要的

 str_c(mydata[1,1],mydata[1,2],mydata[1,3])   
 [1] "100"

但是我有比这更多的样本日期和其他日期和/或样本数量不同的网站，所以我认为这样可以避免为每个网站更改上面的代码，但这不起作用。有没有办法实现这一点，而不是每次更改网站或数据集时都不改变mydata [1,1]，mydata [1,2]，mydata [1,3]？

 str_c(mydata[1,1:length(Date.list)])

示例数据（如果有帮助）

 mydata <- c(1,0,0,1,0,1,0,1,0,0,1,0)
 m <- matrix(mydata, nrow=4,ncol=3, byrow=TRUE)

感谢您对这个小而恼人的问题提供任何帮助

Answer 1

使用apply

apply(m,1,function(x) paste0(x,collapse = ''))
[1] "100" "101" "010" "010"

连接MARK的生存矩阵

1 个答案: