r - R ファイルへの書き込み / ファイルの先頭に追加

Question

最初の行に、ファイルがスパースかどうか、スパースの場合は変数レベルの数を示す 1 行を必要とする入力ファイルを書き込もうとしています。ファイルの末尾に 1 行を追加する方法は知っていますが、ファイルの最初の行に追加する方法が見つかりません。助言がありますか？

library(e1071)
library(caret)
library(Matrix)
library(SparseM)

iris2 <- iris
iris2$sepalOver5 <- ifelse(iris2$Sepal.Length >= 5, 1, -1) 
head(iris2)
summary(iris2)

trainRows <- sample(1:nrow(iris2), nrow(iris2) * .66, replace = F)
testRows <- which(!(1:nrow(iris2) %in% trainRows))
sum(testRows %in% trainRows)
sum(trainRows %in% testRows)

vtu1 <- c('Sepal.Width','Petal.Length','Petal.Width','Species')
dv1 <- dummyVars( ~., data = iris2[,vtu1], sparse = T)

train <- iris2[trainRows,]
test <- iris2[testRows,]

trainX <- as.matrix.csr(predict(dv1, train))
testX <- as.matrix.csr(predict(dv1, test))
trainY <- train[,'sepalOver5']
testY <- test[,'sepalOver5']

write.matrix.csr( as(trainX , "matrix.csr"), file= "amz.train" ,  fac = TRUE)
headString <- paste('sparse ',max(trainX@ja),sep = '')

基本的に、最初の行に挿入/追加headStringしたいと思います。amz.train助言がありますか？