diff --git a/docs/reference/blast_repbase.html b/docs/reference/blast_repbase.html index e34e9bb..f2d7bba 100644 --- a/docs/reference/blast_repbase.html +++ b/docs/reference/blast_repbase.html @@ -179,11 +179,11 @@

Examp repbase.path = "path/to/Athaliana_repbase.ref", cores = 4) -Annot <- dplyr::select(dplyr::filter(dplyr::group_by(q,query_id), +Annot <- dplyr::select(dplyr::filter(dplyr::group_by(q,query_id), (bit_score == max(bit_score))), query_id:q_len,evalue,bit_score,scope) # select only hits with a scope > 0.1 -Annot.HighMatches <- dplyr::filter(Annot, scope >= 0.1) +Annot.HighMatches <- dplyr::filter(Annot, scope >= 0.1) # Annotate the proportion of hits barplot(sort(table(unlist(lapply(stringr::str_split( names(table(Annot.HighMatches$subject_id)),"_"),