我有两个数据集。一个数据集是染料，它有两列时间和染料，另一个数据集是sed。 Sed数据集也有时间和sed。然后我想从sed与染料的比例中找到新的变量new。我想找到这样的比例：如果染料或sed为零，那么new将为零，否则将new计算为sed / dye。
到目前为止，我所使用的代码如下：
dyei94j66 <- read.table("i94 j66 dye time series.Dat",header=T,sep="\t")
names(dyei94j66) <- c("Time","Dye")
head(dyei94j66)
sedi94j66 <- read.table("i94 j66 sediment time series.Dat", header=T,sep="\t")
names(sedi94j66) <- c("Time","Sed")
head(sedi94j66)
newi94j66 <- data.frame(sedi94j66$Sed / dyei94j66$Dye)
head(newi94j66)
# Merge two datasets
totaldata <- merge(dyei94j66,sedi94j66, all=TRUE)
我不知道如何使用条件来计算比率。可能是我需要创建一个我不确定的功能。现在，当染料或sed为零时，R计算的值为NaN。所以，我想在计算比率时将NaN更改为零。
我希望我解释了我在寻找什么。谢谢。
i94 j66沉积物时间序列的数据可在https://www.dropbox.com/s/1cbo8wul9nb8zeh/i94%20j66%20sediment%20time%20series.Dat找到 可以在https://www.dropbox.com/s/sqm8rip2xjh3tiu/i94%20j66%20dye%20time%20series.Dat
上找到i94 j66 dey时间序列的数据