0

解決策を見つけるために、このフォーラムを一日中検索しましたが、見つからなかったので投稿します。答えがすでに出ている場合は、正しい方向に向けてください。

私が持っているもの - 次のような 40 個のテキスト ファイルを含むディレクトリ

  • test_63x_disc_z00.txt
  • *01.txt
  • *02.txt
  • ...
  • *39.txt

これらの各ファイルには、ヘッダーのない 10 列のデータとさまざまな行数があります。

私が欲しいもの - 名前を持つテキストファイルごとに R に個別の data.frame が必要です:

  • ファイル00
  • file01
  • ...
  • file39.

次に、これらの各 data.frames にヘッダー列を追加します。

次に、データを簡単に操作できるようにしたい（この最後の部分は、データを入力したら整理できます）

これが私が達成したことです (今は笑わないでください) -

次のように、単一のテキスト ファイルをデータ フレームとして入力し、ヘッダーを追加できます。

d<-read.delim("test_63x_disc_z00.txt", header = F)

colnames(d)<-c("cell","CentX","CentY","CountLabels","AvgGreen","DeviationsGreen","AvgRed","DeviationsRed","GUI-ID","Slice")

40 個のファイルすべてに対して各コマンドを実行し、個別のファイル名を維持するためのループを設定する方法がわかりません。

4

2 に答える 2

0

入力コードを編集してくれたメトリクスに感謝します...あなたが行った形式を与える方法がわかりませんでした。

だから私はそれを理解しました（ダーティバージョン）が、まだ作業が必要です-

stem <- c("/Users/stefanzdraljevic/Northwestern/2013/Carthew-Rotation/Sample-Images-Ritika/ritika-tes/statistics3/test_63x_disc_z")

上記はファイル名の語幹です`

addition <- c("00","01","02","03","04","05","06","07","08","09","10","11","12","13","14","15","16","17","18","19","20","21","22","23","24","25","26","27","28","29","30","31","34","35","36","37","38","39")

これにより、ステムの末尾にテキスト ファイルの番号が追加されます。「00」の番号付け構造をすべて書き出さずに組み込む方法がわかりません。

colnames <- c("cell","CentX","CentY","CountLabels","AvgGreen","DeviationsGreen","AvgRed","DeviationsRed","GUI-ID","Slice")

これにより、列名が data.frame に追加されます

    data = NULL
for(j in stem){
    data[[j]] = NULL
    for(i in addition){
        data[[j]][[i]] = read.table(paste(j,i,".txt",sep=""), header=F, col.names=colnames)
    }
}

このループがうまくいきます。

于 2013-09-25T14:10:46.593 に答える