Thank you for that response, and it answered my question the way I asked it.
However it hasn't fixed my issue as I thought it would...lol
I am trying to get my zero to represent 'No' and 1 to be 'Yes' but it come up in my table as n/a.....my code is below.
dataset$Purchased = factor(dataset$Purchased,
levels = c('No', 'Yes'),
labels = c(0, 1))