Question

输出中的数字如下所示：

[1] 4.032134 1.000000 2.000000
[1] 3.476687 1.000000 3.000000
[1] 2.710619 1.000000 4.000000

首先我要在第二和第三列（没有零）中舍入数字：1,2,3 第二，我希望每列都有标题。一般来说，我想要输出一个输出：

  Distance  First  second
[1] 4.032134  1      2
[1] 3.476687  1      3
[1] 2.710619  1      4

有可能在R中做到吗？我怎么能这样做？

更新

我正在生成此输出：

while(i < end-start+1)
{ 
  n<-1
  m<-strsplit(datalist[i],split=",")
  m<-sapply(m,as.numeric)
  m<-c(m)
  while(i+n<=end-start+1)
  {
    k<-strsplit(datalist[i+n],split=",")
    k<-sapply(k,as.numeric)
    k<-c(k)
    alignment<-dtw(k,m)
    output<-c(alignment$distance,round(i,digits=1),i+n)
    print(output)

    n<-n+1
  }

  i<-i+1
}

Answer 1

此示例适用于您的小型数据集。它可能不是最优雅但它有效。

制作数据的载体

DataSet<-c(4.032134,1.000000,2.000000,3.476687,1.000000,3.000000,2.710619,1.000000,4.000000)

转换为具有3列和3行的矩阵，按行排序 DataMatrix<-matrix(DataSet, byrow=T, ncol=3)

根据问题列的列名 Names <- c("Distance", "First", "second")

这是关键，使用命令colnames（x），你就完成了 colnames(DataMatrix) <- Names

屏幕上的打印输出
DataMatrix

将标题放在输出和raonding数字中

1 个答案: