Got it..Thanks :)
On Thu, Jul 3, 2014 at 12:44 PM, Pascal Oettli <kri...@ymail.com> wrote: > 3rd line: > > if(!is.na(CA_AMT_PAYBACK ){ > ^ ^ ^ > > Two brackets opened, only one closed. You must close the second one. > > HTH > Pascal > > > On Thu, Jul 3, 2014 at 4:03 PM, Abhinaba Roy <abhinabaro...@gmail.com> > wrote: > > Hi, > > > > The 'if' statement closes > > CA$IND_COLLECTION[CA$TOT_PAID= > > =0] <- 5L} > > > > > > > > On Thu, Jul 3, 2014 at 12:12 PM, Pascal Oettli <kri...@ymail.com> wrote: > >> > >> Hi, > >> > >> At the 3rd line, a bracket is missing, to close the "if" statement. > >> > >> HTH > >> Pascal > >> > >> On Thu, Jul 3, 2014 at 3:29 PM, Abhinaba Roy <abhinabaro...@gmail.com> > >> wrote: > >> > Hi R-helpers, > >> > > >> > Can someone help me with this function > >> > > >> > prepArr <- function(CA) { > >> > if(CA$CD_ACCRUAL_FLAG == 'AY' ){ > >> > if(!is.na(CA_AMT_PAYBACK ){ > >> > CA$IND_COLLECTION[(CA$TOT_PAID>=CA$TOT_ARREAR_BEG| > >> > CA$TOT_PAID>=CA_AMT_PAYBACK)] <- > 1L > >> > CA$IND_COLLECTION[CA$TOT_PAID<CA_AMT_PAYBACK] <- 2L > >> > CA$IND_COLLECTION[CA$TOT_PAID==0] <- 5L} > >> > else{ > >> > CA$IND_COLLECTION[(CA$TOT_PAID>=CA$TOT_ARREAR_BEG| > >> > CA$TOT_PAID>=CA$ARR_SAT)] <- 1L > >> > CA$IND_COLLECTION[CA$TOT_PAID<CA$ARR_SAT] <- 4L > >> > CA$IND_COLLECTION[CA$TOT_PAID==0] <- 5L > >> > } > >> > > >> > } > >> > if(CA$ACC_PREV == 'AY'){ > >> > if(!is.na(CA_PAYBACK_PREV)){ > >> > CA$IND_PREV[(CA$PAID_PREV>=ARR_PREV| > >> > CA$PAID_PREV>=CA_PAYBACK_PREV)] <- 1L > >> > CA$IND_PREV[CA$PAID_PREV<CA_PAYBACK_PREV] <- 2L > >> > CA$IND_PREV[CA$PAID_PREV==0] <- 5L} > >> > else{ > >> > CA$IND_PREV[(CA$PAID_PREV>=ARR_PREV| > >> > CA$PAID_PREV>=CA$ARR_SAT_PREV)] <- > >> > 1L > >> > CA$IND_PREV[CA$PAID_PREV<CA$ARR_SAT_PREV] <- 4L > >> > CA$IND_PREV[CA$PAID_PREV==0] <- 5L > >> > } > >> > > >> > } > >> > > >> > return(CA) > >> > } > >> > > >> > When I run this function in R, it throws me a lot of errors. > >> > > >> > -- > >> > Regards, > >> > Abhinaba Roy > >> > > >> > [[alternative HTML version deleted]] > >> > > >> > ______________________________________________ > >> > R-help@r-project.org mailing list > >> > https://stat.ethz.ch/mailman/listinfo/r-help > >> > PLEASE do read the posting guide > >> > http://www.R-project.org/posting-guide.html > >> > and provide commented, minimal, self-contained, reproducible code. > >> > >> > >> > >> -- > >> Pascal Oettli > >> Project Scientist > >> JAMSTEC > >> Yokohama, Japan > > > > > > > > > > -- > > Regards, > > Abhinaba Roy > > > > > > > > -- > Pascal Oettli > Project Scientist > JAMSTEC > Yokohama, Japan > -- Regards, Abhinaba Roy [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.