Error in select(Gender, HomeOwn) %>% filter(HomeOWn %in% c("Own", "Rent")) : could not find function "%>%"

Sorry but I don't understand what you mean and screenshots are not very useful (also not a good thing to do here), please provide a proper REPRoducible EXample (reprex) to exemplify your issue.