Using the iris dataset in R Studio, $$subset the dataset so you have the first $25$ versicolor observations and the first $25$ virginica in a training dataset. Put the rest $($versicolor and virginica$)$ in a test dataset. Build a logistic regression model $($you don't have to make your own$)$ of species predicted by petal width. Next, predict the class $($virginica$)$ in the test data, using a cutpoint of $0\mathrm{.}5$ for probability.

Question $1$: What is the accuracy? Round to $2$ decimal places.

Question $2$: What is the sensitivity for the same? Round to $2$ decimal places.

Question $3$: What is the precision? Round to $2$ decimal places.

Question $4$: What is the specificity? Round to $2$ decimal places.

Please also provide R code.