R中的加权随机数生成

I'm trying to generate a set of 100 random integers between a fixed range. One could be comprised of 100 numbers between 1 and 3, with specific probabilities of obtaining either 1, 2 and 3. I'm trying to generate a set of 100 random inte