Skip to content

Instantly share code, notes, and snippets.

@houshuang

houshuang/cleanup.R

Last active August 25, 2015 19:25
Show Gist options
  • Star 1 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save houshuang/edab46eaa9ecd3b2dbb6 to your computer and use it in GitHub Desktop.
Save houshuang/edab46eaa9ecd3b2dbb6 to your computer and use it in GitHub Desktop.
Download ZIP
stops working beyond a certain number of elements
Raw
cleanup.R
elem = function(x,y) { x[[y]]}
splitspc = . %>% as.character %>% strsplit(' ', fixed=TRUE) %>% unlist
a = dbraw$V6 %>% head(n=10000000) %>% laply(splitspc)
method =a[1,]
url = a[2,]
# output:
# > a = dbraw$V6 %>% head(n=100) %>% laply(splitspc)
# > a = dbraw$V6 %>% head(n=1000) %>% laply(splitspc)
# > a = dbraw$V6 %>% head(n=10000) %>% laply(splitspc)
# Error: Results must have the same dimensions.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment