search for: wx2

...========================================================================== local.whittle <- function(d, x, m) { n <- length(x) t <- matrix(c(0:n1), nrow = n, ncol=1) lambda <- (2*pi*t)/n wx <- (2*pi*n)^(-1/2)*Conj(fft( Conj(x)))*exp(1i*lambda) M1 <- m+1 lambda2 <- lambda[2:M1] wx2 <- wx[2:M1] ix <- wx2*Conj(wx2) g <- mean((lambda2^(2*d))*ix) r <- log(mean((lambda2^(2*d))*ix)) - 2*d*mean(log(lambda2)) } ======================================================================================= which seems to run, but when I am trying to call the function and minimiz...

...(x1 = c(15, 12, 3, 10, 10, 14, 12), x2 = c(10, 11, 16, 9, 7, 17, 18), g = c( 1, 1, 1, 2, 2, 3, 3), w = c( 2, 3, 1, 5, 5, 2, 5)) wx1 <- sapply(split(df, df$g), function(x){weighted.mean(x$x1, x$w)}) wx2 <- sapply(split(df, df$g), function(x){weighted.mean(x$x2, x$w)}) The above code works, the result is: > wx1 1 2 3 11.50000 10.00000 12.57143 > wx2 1 2 3 11.50000 8.00000 17.71429 But is there not a more elegant way of acting on x1 and x2 sim...

...king copy) @@ -21,6 +21,7 @@ if(core_name == "App") found_app_constructor = false + wx_name = core_name else found_app_constructor = true end -------------- next part -------------- An embedded and charset-unspecified text was scrubbed... Name: wx2.patch Url: http://rubyforge.org/pipermail/wxruby-development/attachments/20070317/bd536f80/attachment.pl

Hi Attached is a patch that adds aliases to the API for methods that look like attribute accessors. So a_frame.set_title(''The title'') # currently a_frame.title = ''The title'' # now an alternative textctrl.get_value # currently textctrl.value # now an alternative Also, C++ methods named ''IsXXX'' are now exposed in ruby with