转置表列移位

Question

我有一个这样的表（注意左上角的空单元格）：

$scope.reload()

当我使用

进行转置时

          C1 C2 C3 C4
R1         0  0  0  0
R2         1  0  1  1

我得到以下内容：

table<-read.table(file="test_table.txt", header = TRUE)
table_t<-t(table)
write.table(table_t, file="transposed_test.txt", sep = "\t", row.names = TRUE, col.names = TRUE)

查看新列（R1和R2）如何向左移动？我该如何阻止这种情况发生？