How To Generate A Value Based On Assigned Probability In R?

Question

I am trying to assign individuals to a site. What I want is to make the probability of choice proportional to two location attributes, in this case, square footage and popul