search for: salesi

...997 14 0.017 1998 14 0.155 1998 14 0.018 1998 14 0.477 1998 14 0.312"), header=TRUE) # The whole dataset x1 # Data for the first group only GROUP11 <- x1[1:10,] GROUP11 # The function works for the first group in one year perf = function(x) { for (i in 1:nrow(x)) { salesi <- x$SALES[i] med <- median(x$SALES[-i]) print (salesi - med) } } perf(GROUP11) # Why the above funtion doesn't work in the following? tapply(x1$SALES, list(x1$YEAR, x1$GROUP), perf) aggregate(x1$SALES, by=list(x1$YEAR, x1$GROUP),FUN=perf) Thanks! Chin...

Asterisk work does not pay all of my bills, so I have joined up with a company that has a very good payment plan. I have recently become a Mona Vie Independent Distributor. I am not going to go into a sales pitch. This is just an FYI to this opportunity. The company has grown into a Billion dollar company in just 2 years. This company's compensation plan is the best and quickest that I have