R言語でcsvファイルの先頭（１行目の上）に文字を追加したい。

Question

前提・実現したいこと

R言語を使用して
次のcsvファイルに
"時刻","A値","B値","C値"
"15:00:00","4,365","4,345","4,365"
"14:59:59","4,360","4,345","4,355"
"14:59:31","4,355","4,340","4,345"
"14:59:30","4,355","4,340","4,350"

文字列（実験A）を追加して次のようなcsvファイルを作成したい。
実験A
"時刻","A値","B値","C値"
"15:00:00","4,365","4,345","4,365"
"14:59:59","4,360","4,345","4,355"
"14:59:31","4,355","4,340","4,345"
"14:59:30","4,355","4,340","4,350"

色々調べましたがわかりませんでした。
どなたかご教授をよろしくお願いいたします。

発生している問題・エラーメッセージ

エラーメッセージ

該当のソースコード

ソースコード

試したこと

ここに問題に対して試したことを記載してください。

補足情報（FW/ツールのバージョンなど）

ここにより詳細な情報を記載してください。

Answer 1

タイトルと CSV ファイルの内容を繋げて cat で出力します。

title <- '実験A'
dat_csv <- readLines('dat.csv', encoding='UTF-8')
output_csv <- 'dat_titled.csv'
cat(title, dat_csv, sep='\n', file=output_csv)

※ エンコーディングを UTF-8 にしています

読み込む際には先頭の一行をスキップします。

dat <- read.csv(output_csv, skip=1, encoding='UTF-8')
dat
      時刻   A値   B値   C値
1 15:00:00 4,365 4,345 4,365
2 14:59:59 4,360 4,345 4,355
3 14:59:31 4,355 4,340 4,345
4 14:59:30 4,355 4,340 4,350

Comments

[T.Y.2]

１日がかりで調べてもわかりませんでした。encoding='UTF-8'を削除したらキレイにできました。
あきらめかけていたところ、このサイトに行き当たりました。迅速に回答していただき本当にありがとうございました。

Answer 2

ざっくりこんな感じで。

write("実験A", file="output.txt")
write.table(dataframe_for_output, file="output.txt", append=TRUE)

ただし、できるファイルはcsvファイルとしては形式が不正なので、出力時に警告が出ると思います。また、write.csvを使おうとすると、この関数はより厳密性を期する仕様になっているため「appendは認めん」ということで、意図した出力は行われません。