I think it'd more or less just be a matter of searching for `all(act$result)` and replacing it with `sum(act$result)/length(act$result) >= prop` Consider for the next major release _Originally posted by @gorcha in https://github.com/socialresearchcentre/testdat/pull/31#discussion_r671589791_