Percent <- data.frame(matrix(, nrow = 207842, ncol = 90))
for ( j in 1 : nrow(justvalues))
{
m=3
n=2
o=1
for( i in 4 : ncol(justvalues))
{
k <- subset(justvalues, Year.of.Date == justvalues[j,i-m]-1 & Quarter.of.Date == justvalues[j,i-n] & Values.A == justvalues[j,i-o])
p <- k[i]
g <- as.numeric(p)
ifelse(g==0, Percent[j,i] = "NA" , Percent[j,i] = ((justvalues[j,i]-g)/g)*100)
m=m+1
n=n+1
o=o+1
}
}
错误:“ifelse中的意外'='(g == 0,百分比[j,i] =”
这是我得到的错误。请检查。