Need to extract 10 id's with a while and if loop from library(ukpolice) R

Question

For assignment we need to use R and I am a rookie with R, so all help is welcome.

we need to use A while and if loop to get 10 id\'s and store these in no_sus as a numer