powered by
getActive(y, A)
data(bell.labs) getActive(bell.labs$Y[1,], bell.labs$A)
Run the code above in your browser using DataLab