R list.filesを用いたcbindの方法

Question

list.filesを用いてディレクトリ内の"a"と付く名前のテキストファイル
"b"が付く名前のテイストファイルをそれぞれa_dataとb_dataに振り分けました
a_dataには"a1.txt""a2.txt""a3.txt"が
b_dataには"b1.txt""b2.txt""b3.txt"が入っています。
a1.txtとb1.txtは21行、a2.txtとb2.txtは22行、a3.txtとb3.txtは23行で同じ行数のファイル同士を結合しようと考えています。
これらをforを使ってcbindで結合するために以下のコードを作りました

a_data <- list.files(pattern = "a")
b_data <- list.files(pattern = "b")

for (a in a_data[1:length(a_data)]){
  for (b in b_data[1:lengthb_data]) {
    dataset_a <- read.table(a, header=F, sep="\t")
    dataset_b <- read.table(b, header=F, sep="\t")
    
    
    cbind(dataset_a,dataset_b) -> data}}
  

しかし、
data.frame(..., check.names = FALSE) でエラー:
引数に異なる列数のデータフレームが含まれています: 21, 22が出てしまいます。
また、dataに上書きされてしまうため別のデータとして分ける方法を教えてください。
よろしくお願いします。

Answer 1

2重ループにしてるのが間違いのもと。
a1とb3とか、全ての組み合わせてcbindしようとしてしまうので、当然失敗する組み合わせが出てきますね。

また、dataに上書きされてしまうため別のデータとして分ける方法

出力先をリストにする。

Comments

[birdman]

教えていただきありがとうございます。
今回のような結合をする場合は、他の方法はあるんでしょうか?

[KojiDoi]

まずは１重ループで書き換えてみて目標が達成できるか確認してみることですね。
次の段階としてはapply系の関数で書き換えてみると勉強になるでしょう。