Guest User

Untitled

a guest
Jan 16th, 2019
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.26 KB | None | 0 0
  1. Filter(is.numeric, mtcars) %>%
  2. split(.$cyl) %>%
  3. lapply(., function(x) colMeans(x))
  4.  
  5. Filter(is.numeric, mtcars) %>%
  6. lapply(split(., cyl), function(x) colMeans(x))
  7.  
  8. Error in match.fun(FUN) :
  9. 'split(., cyl)' is not a function, character or symbol
Add Comment
Please, Sign In to add comment