Duncan Murdoch <[EMAIL PROTECTED]> writes:
> On Tue, 6 Apr 2004 14:18:42 +0000 (UTC), you wrote:
>
> >Robin Hankin <rksh <at> soc.soton.ac.uk> writes:
> >> R> a <- matrix(1:9,3,3)
> >> But the following caught me off-guard:
> >> R> a <- matrix(1:9,3,3)
> >> R> a[a%%2==1] %+=% 1000*(1:5)
> >
> >How about this way:
> >
> >> a <- matrix(1:9,3,3)
> >> "plus<-" <- function(a,value) a+value
> >> plus(a[a%%2==1]) <- 1000*(1:5)
> >> a
> > [,1] [,2] [,3]
> >[1,] 1001 4 4007
> >[2,] 2 3005 8
> >[3,] 2003 6 5009
>
> Wouldn't a clearer syntax to follow be Pascal's? I.e.
>
> inc <- function(a, b) {
> eval.parent(substitute(a <- a + b))
> }
>
> Then in order to increment x[3], you'd use
>
> inc(x[3], 1)
>
But that's not kosher in functional programming languages where you
expect function calls not to modify their arguments, is it? (OK, so
assignment is also a function call as is setq in Lisp, but we have
syntactic sugar to cover that. That's what was nice about %<-%.)
BTW, you can also (but I'm not sure you should!) do
"+<-" <- function(x,value) x + value
x <- c(2,3)
+x[1] <- 3
-p
--
O__ ---- Peter Dalgaard Blegdamsvej 3
c/ /'_ --- Dept. of Biostatistics 2200 Cph. N
(*) \(*) -- University of Copenhagen Denmark Ph: (+45) 35327918
~~~~~~~~~~ - ([EMAIL PROTECTED]) FAX: (+45) 35327907
______________________________________________
[EMAIL PROTECTED] mailing list
https://www.stat.math.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
