data('twitter')
twitSet <- create_hierarchy(twitter)
# Just get the counts
countOut <- outlying_elements(twitSet)
head(countOut)
# Or the actual elements
elemOut <- outlying_elements(twitSet, FALSE)
head(elemOut)
Run the code above in your browser using DataLab