Re: [R] Question about functions in R

From: Peter Dalgaard <p.dalgaard_at_biostat.ku.dk>
Date: Thu 20 Jul 2006 - 21:00:11 EST

"Ivan Kalafatic" <ivan.kalafatic@gmail.com> writes:

> I tried to make the following function:
>
> function(x, y){
> dates<-intersect(x[,1],y[,1])
> m<-matrix(NA,length(dates),3)
> m[,1]<-dates
> j<-1
> k<-1
> for(i in fdax[,1]){
> if(is.element(i,dates)){
> m[j,3]<-as.numeric(fdax[k,2])
> j<-j+1
> }
> k<-k+1
> }
> return(m)
> }
>
> When I try to import it into R with edit( file="name.txt",
> editor="someeditor") I get the response that there is an error on the
> line where last bracket is.
> When I execute this code manualy in R command by command everything works ok.
> This happened to me before with other functions. Sometimes I can
> import them and they work perfectly but sometimes I get the error on
> the last line of code which is alvays the final bracket.
>
> Anyone has any idea why this is happening?

It's not happening for me with

> edit( file="tmp/xxx.R", editor="emacs")
function(x, y){

   dates<-intersect(x[,1],y[,1])
   m<-matrix(NA,length(dates),3)
   m[,1]<-dates
   j<-1
   k<-1
   for(i in fdax[,1]){

      if(is.element(i,dates)){
         m[j,3]<-as.numeric(fdax[k,2])
         j<-j+1
      }
      k<-k+1

   }
   return(m)
}

(after copying your function into tmp/xxx.R of course).

So there is something you're not telling us... (could there be an incomplete last line, by any chance?)

-- 
   O__  ---- Peter Dalgaard             ุster Farimagsgade 5, Entr.B
  c/ /'_ --- Dept. of Biostatistics     PO Box 2099, 1014 Cph. K
 (*) \(*) -- University of Copenhagen   Denmark          Ph:  (+45) 35327918
~~~~~~~~~~ - (p.dalgaard@biostat.ku.dk)                  FAX: (+45) 35327907

______________________________________________
R-help@stat.math.ethz.ch 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.
Received on Fri Jul 21 00:23:38 2006

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.1.8, at Fri 21 Jul 2006 - 02:20:13 EST.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-help. Please read the posting guide before posting to the list.