(R Studio) How can I create a boxplot comparing selected observations from two different variables?

Question

The table below is a sample of a larger dataframe on RStudio. How could I select the smokers (Y) and those who drink alcohol (Y) and compare their BPs against each other on