Faster version of combn

by

You could use combnPrim from gRbase

source("http://bioconductor.org/biocLite.R")
biocLite("gRbase") # will install dependent packages automatically.
system.time({
 d.1 <- as.data.table(t(combn(d$id, 2)))
 })
#   user  system elapsed 
# 27.322   0.585  27.674 

system.time({
d.2 <- as.data.table(t(combnPrim(d$id,2)))
 })
#   user  system elapsed 
#  2.317   0.110   2.425 

identical(d.1[order(V1, V2),], d.2[order(V1,V2),])
#[1] TRUE

More Related Contents:

  1. data.table vs dplyr: can one do something well the other can’t or does poorly?
  2. How to delete a row by reference in data.table?
  3. Table of Interactions – Case with pets and houses
  4. Why does X[Y] join of data.tables not allow a full outer join, or a left join?
  5. Filtering out duplicated/non-unique rows in data.table
  6. Which data.table syntax for left join (one column) to prefer
  7. data.table with two string columns of set elements, extract unique rows with each row unsorted
  8. Evaluating both column name and the target value within `j` expression within `data.table`
  9. How to calculate combination and permutation in R?
  10. Fill in missing values by group in data.table
  11. dplyr on data.table, am I really using data.table?
  12. data.table and parallel computing
  13. Elegantly assigning multiple columns in data.table with lapply()
  14. Sort a data.table fast by Ascending/Descending order
  15. No RTools compatible with R version 3.5.0 was found
  16. Join R data.tables where key values are not exactly equal–combine rows with closest times
  17. how to show a legend on dual y-axis ggplot
  18. Non-equi join using data.table: column missing from the output
  19. Why is as.Date slow on a character vector?
  20. Cleaning `Inf` values from an R dataframe
  21. How to group data.table by multiple columns?
  22. can the value.var in dcast be a list or have multiple value variables?
  23. Apply a function to a subset of data.table columns, by column-indices instead of name
  24. Selecting a subset of columns in a data.table
  25. grouped operations that result in length not equal to 1 or length of group in dplyr
  26. Merge overlapping ranges into unique groups, in dataframe
  27. add missing rows to a data table
  28. assigning by reference into loaded package datasets
  29. Index unique values in data.table
  30. calculating sum of previous 3 rows in R data.table (by grid-square)

Leave a Comment