本人现在有一些膳食数据，想利用Ｒ实现ｅｘｃｅｌ中的Vlookup功能，
想根据data1code及data2中的foodname实现匹配计算对象每种食物的能量等物质的摄入情况，
其中data1中的数据是每100g食物中含有的物质。

我之前的做法比较笨，是通过将两个数据合并后，生成新变量来计算的，但是要计算18次，，，
想问问各位大神是否有较简单的方法。

hebing <- merge(new,key,by="code")
hebing2 <- hebing[order(hebing$id),]View(hebing)hebing <- merge(new,key,by="code")
hebing2$water<- hebing2$water*hebing2$amount
请各位大神指教。