Displaying 1 result from an estimated 1 matches for "uniqval".
Did you mean:
uniqual
2010 Sep 16
0
improvements to plm fitting
...9;. A nice way to handle
this would be for it to be left as a parameter that, by default, is set to
do the entire data set at once.
Tapply.default <- function (x, effect, func, ...)
{
na.x <- is.na(x)
effect_unique <- unique(effect)
n_effects <- length( effect_unique )
uniqval <- array(dim=n_effects)
attr(uniqval, "dimnames")[[1]] <- as.character(effect_unique)
# change this back so that it can handle larger datasets
block_size <- n_effects
num_blocks <- ceiling( n_effects / block_size )
for( i in 1:num_blocks ){
these_i...