A dot can be replaced even if it is not direct argument of rhs call

unpipe(quote(1:5 %>% .[.%%2==0]))
unpipe(quote(1:5 %>% ((.+1)*.)))