r - 関心のある 2 つのキーワードを含む行から値を取得して、R に新しい列を作成するにはどうすればよいですか?

Question

次のようなデータテーブルがあります。

そして、私が基本的にやりたいことは、各サンプルの「読み取り」に倍数の変化を含むテーブルに新しい列を作成することです。たとえば、次のようになります。

WEEK 0 のサンプル 1/WEEK 0 のサンプル 1

4週目のサンプル1/0週目のサンプル1

14 週目のサンプル 1/0 週目のサンプル 1

などなど、サンプル 1 のすべての時点について、0 週目からのそれぞれの「読み取り値」を使用して、残りのサンプルについて同じことを計算します。

これまでのところ、私が試したことは、次のようなものです。

r
SampleIDs<-as.character(unique(table$ID))

table$FC<-for(i in table[i,]){
for(j in SampleIDs){

if(table[i,"ID"]==j){

    table[i,3]/table[(("WEEK"==0)&("ID"==j)),3]
    }
    }
  }

}

実行すると、コードはエラーを返します。

Error in if (table[i, "SampleID"] == j) { : argument is of length zero

私がやろうとしていたのは、一意の ID を持つ別のベクターを作成し、それを for 関数で使用して行ごとに移動し、行に同じ ID を持つサンプルが含まれていることを確認してから、そのセルを取得しようとすることでした。 ID j のサンプルのデータが含まれており、倍率変更値を計算するためのWEEK 0 からのものです。これを行う方法についての助けをいただければ幸いです。ありがとうございました