Question

我正试图找出一种优雅的方法来执行以下操作：

我有两个数据框：

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的列名称从multipFactors中选择正确的concvals，然后将concvals['FT325']乘以相应的{{1} }}。乘法可以在原地完成，也可以在新的数据框中完成，我不介意。

是否有“R”方法可以做这样的事情，还是会有循环的场合？

很抱歉 - 只是看一下这个例子，Dfactor不是R意义上的一个因素，它是稀释因子的缩写，所以实际上是一个数字。在这个例子中，它看起来只有两个稀释因子（5000,1000），但可能还有其他因素。抱歉缺乏清晰度。

由于 ħ

Answer 1

这应该有效：

mapply("*", concvals[multipFactors$Library], multipFactors$Dfactor)

R使用查找表

1 个答案: