[R] generate random numbers that sum up to 1

[sun]

I am trying to generate a vector of random numbers with the constraint that 
they have to sum up to one with uniform distribution.

eg. {0.1,0.7,0.2 }

any function to do this? Thanks.