plotInterVsIntra causing error

[Julian Zhou]

Some kind of density estimate issue, having to do with the data being small/sparse.

Error message:

Error in density.default(a, from = xlim[1], to = xlim[2]) : 
  need at least 2 points to select a bandwidth automatically 

Traceback:

7.
stop("need at least 2 points to select a bandwidth automatically") 
6.
density.default(a, from = xlim[1], to = xlim[2]) 
5.
density(a, from = xlim[1], to = xlim[2]) at Functions.R#380
4.
as.data.frame(density(a, from = xlim[1], to = xlim[2])[c("x", 
    "y")]) at Functions.R#380
3.
merge(as.data.frame(density(a, from = xlim[1], to = xlim[2])[c("x", 
    "y")]), as.data.frame(density(b, from = xlim[1], to = xlim[2])[c("x", 
    "y")]), by = "x", suffixes = c(".a", ".b")) at Functions.R#380
2.
plotInterVsIntra(data = results$inter_intra) at Functions.R#954
1.
defineClonesScoper(db = db, model = "spectral", method = "vj", 
    germline_col = "h_GERMLINE_IMGT", sequence_col = "h_SEQUENCE_IMGT", 
    junction_col = "h_cdr3", v_call_col = "h_v", j_call_col = "h_j", 
    clone_col = "CLONE", first = F, cdr3 = F, mod3 = F, nproc = NPROC,  ... 

[Julian Zhou]

Can be by-passed by skipping `p_results <- plotInterVsIntra(data = results$inter_intra)`

[nima nouri]

resolved by 7f13fd2.