Displaying 1 result from an estimated 1 matches for "fincort".
Did you mean:
fincore
2010 May 31
2
Problems with apply
...$SecSte : $ operator is invalid for atomic vectors
I don't understand why. when I use the apply I am doing:
PromP <- function(HistRio,AnaQuim){
xx <- c(0,0,0)
if(length(which(AnaQuim$SecSte==HistRio$SecSte))>0){ xx[1]<-1 }
if(length(which(as.Date(AnaQuim$A?O1)<=as.Date(HistRio$FinCorte)))>0){ xx[2]
<- 1}
if( length(which(as.Date(AnaQuim$A?O1)>=as.Date(HistRio$FechaSiembra)))>0){
xx[3]<-1 }
if( length(which(as.Date(AnaQuim$A?O1)>=as.Date(HistRio$FechaSiembra)))>0 &
length(which(as.Date(AnaQuim$A?O1)<=as.Date(HistRio$FinCorte)))>0 ){ xx[4]
<- 2}
r...