At 13:27 31/08/2007, dxc13 wrote:
>I keep getting the 'memory.size' error message when I run a program I have
>been writing. It always it cannot allocate a vector of a certain size. I
>believe the error comes in the code fragement below where I have multiple
>arrays that could be taking up space. Does anyone know a good way around
>this?
It is a bit hard without knowing the dimensions of the arrays but see below.
>w1 <- outer(xk$xk1, data[,x1], function(y,z) abs(z-y))
>w2 <- outer(xk$xk2, data[,x2], function(y,z) abs(z-y))
>w1[w1 > d1] <- NA
>w2[w2 > d2] <- NA
>i1 <- ifelse(!is.na(w1),yvals[col(w1)],NA)
>i2 <- ifelse(!is.na(w2),yvals[col(w2)],NA)
If I read this correctly after this point you no longer need w1 and
w2 so what happens if you remove them?
>zk <- numeric(nrow(xk)) #DEFININING AN EMPTY VECTOR TO HOLD ZK VALUES
>for(x in 1:nrow(xk)) {
> k <- intersect(i1[x,], i2[x,])
> zk[x] <- mean(unlist(k), na.rm = TRUE)
>}
>xk$zk <- zk
>data <- na.omit(xk)
>--
>View this message in context:
>http://www.nabble.com/memory.size-help-tf4359846.html#a12425401
>Sent from the R help mailing list archive at Nabble.com.
Michael Dewey
http://www.aghmed.fsnet.co.uk
______________________________________________
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.
