Closed josswhittaker closed 11 years ago
Even with the revised function this gives:
findassocs <- JSTOR_findassocs(unpack1grams, nouns, n = 10, "agriculture", corlimit=0.8, plimit=0.05) Error in if (nrow(x.cor[x.cor[, 2] < plimit, ]) == 0) { : argument is of length zero
with 7L
I'll have a closer look... probably the control structure to manage null output when the corlimit is too high isn't quite working...
This was returning a single row matrix in a few places that was foiling nrow(...matrix...)
. Added , drop = FALSE
in a few key places to fix this. It's working well now for these specific parameters.