abbbb <- function(x = 22) { data_frame( x = long_long_long * x ) }