weekdays code snippets in r

get a list of dates for the next 20 fridays in r