prepared for issue 2

subsetting in reactive ()