Вы можете установить подмножество своих данных, а затем создать свой блок-график.
test <- data.frame(ID=c(1,2,3,4,5),Ward=c(1,1,2,3,1),Lead=c(5.0,7.8,3.6,2.8,6.3))
Приведенный выше код просто создает образцы данных
ID Ward Lead
1 1 1 5.0
2 2 1 7.8
3 3 2 3.6
4 4 3 2.8
5 5 1 6.3
Подмножество данных
subset(test,test$Ward==1)
Это приводит к
ID Ward Lead
1 1 1 5.0
2 2 1 7.8
5 5 1 6.3