1

私は次のことを行うためのエレガントな方法を見つけようとしています:

2 つのデータ フレームがあります。

multipFactors:

structure(list(Library = c("FT259", "EL259", "FT261", "EL261", 
"FT325", "EL325"), Vol = c(2.5, 1, 2.5, 1, 2.5, 1), Dfactor = c(5000L, 
1000L, 5000L, 1000L, 5000L, 1000L)), .Names = c("Library", "Vol", 
"Dfactor"), row.names = c(NA, 6L), class = "data.frame")

concvals

structure(list(FT265 = c(1.87143067658684, 6.42164423157045, 
3.2067011263946, 38.6127973672561, 31.413779293588, 35.5528208255031
), EL265 = c(17.1144442552411, 17.3273656558687, 14.7909715401529, 
NaN, NaN, NaN), FT325 = c(35.3550952814249, 37.9458212939415, 
29.8197141318635, 35.1760971346751, 36.7065424286613, 42.9943003679566
), wellid = structure(c("A1", "B1", "C1", "D1", "E1", "F1"), .Dim = c(6L, 
1L))), .Names = c("FT265", "EL265", "FT325", "wellid"), row.names = c(NA, 
6L), class = "data.frame")

の列名に基づいて正しいDfactorものを選択し、適切なものを掛ける方法を見つけようとしています。乗算は、その場で行うことも、新しいデータ フレームに行うこともできますが、気にしません。 multipFactorsconcvalsconcvals['FT325']Dfactor

このようなことを行う「R」の方法はありますか、それともループの機会になるでしょうか?

申し訳ありませんが、例を見るだけDFactorで、R の意味での係数ではありません。希釈係数の略で、実際には数値です。この例では、希釈係数が 2 つ (5000、1000) しかないように見えますが、他にもある可能性があります。わかりにくくてすみません。

ありがとうH

4

1 に答える 1

2

これはうまくいくはずです:

mapply("*", concvals[multipFactors$Library], multipFactors$Dfactor)
于 2012-09-21T13:57:59.090 に答える