SCM

SCM Repository

[tm] Diff of /pkg/R/transform.R
ViewVC logotype

Diff of /pkg/R/transform.R

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1444, Mon Aug 22 11:50:13 2016 UTC revision 1445, Sun Oct 9 09:30:58 2016 UTC
# Line 15  Line 15 
15          else          else
16              x$lazy$maps <- c(x$lazy$maps, list(fun))              x$lazy$maps <- c(x$lazy$maps, list(fun))
17      } else      } else
18          x$content <- mclapply(content(x), FUN, ...)          x$content <- lapply(content(x), FUN, ...)
19      x      x
20  }  }
21  tm_map.SimpleCorpus <-  tm_map.SimpleCorpus <-
# Line 42  Line 42 
42         i <- (seq_along(x) %in% range) & x$lazy$index         i <- (seq_along(x) %in% range) & x$lazy$index
43         if (any(i)) {         if (any(i)) {
44             x$content[i] <-             x$content[i] <-
45                 mclapply(x$content[i], function(d) tm_reduce(d, x$lazy$maps))                 lapply(x$content[i], function(d) tm_reduce(d, x$lazy$maps))
46             x$lazy$index[i] <- FALSE             x$lazy$index[i] <- FALSE
47         }         }
48    

Legend:
Removed from v.1444  
changed lines
  Added in v.1445

R-Forge@R-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business University of Wisconsin - Madison Powered By FusionForge