Running examples in 'disprose-Ex.R' failed
The error most likely occurred in:

> ### Name: summarize_blast_result
> ### Title: Summarize BLAST result
> ### Aliases: summarize_blast_result
> 
> ### ** Examples
> 
> path <- tempdir()
> dir.create (path)
Warning in dir.create(path) : 'D:\temp\RtmpgpPAz5' already exists
> # load blast results with subject accession numbers
> data(blast.fill)
> #load metadata of all Chlamydia pneumoniae sequences - they are subjects that
> # do not count as nonspecific and may be aligned
> data(meta.all)
> # load metadata with target Chlamydia pneumoniae sequences - they are specific subjects
> # that must be aligned
> # make new accession numbers to count all WGS sequences as one (see unite_NCBI_ac.nums ())
> meta.target.new.ids <- unite_NCBI_ac.nums (data = meta.target,
+                                           ac.num.var = meta.target$GB_AcNum,
+                                           title.var = meta.target$title,
+                                           db.var = meta.target$source_db,
+                                           type = "shotgun", order = TRUE,
+                                           new.titles = TRUE)
> # summarize blast results, count aligned specific subjects with "switch ids" option
> # (WGS sequences are counted as one). Add query cover information.
> blast.sum.sp <- summarize_blast_result (sum.aligned = "sp",
+                                        blast.probe.id.var = blast.fill$Qid,
+                                        blast.res.id.var = blast.fill$Racc,
+                                        blast.res.title.var = blast.fill$Rtitle,
+                                        reference.id.var = meta.target.new.ids$new.id,
+                                        reference.title.var = meta.target.new.ids$new.title,
+                                        titles = TRUE,
+                                        add.blast.info = TRUE,
+                                        data.blast.info = data.frame(Qcover = blast.fill$Qcover),
+                                        switch.ids = TRUE, switch.table = meta.target.new.ids,
+                                        temp.db = paste0 (path, "/temp.db"), delete.temp.db = TRUE,
+                                        return = "summary", write.alignment = "DB",
+                                        alignment.db = paste0 (path, "/alig.db"))
Checking settings
Summarizing specific alignment
Create temporal database
Switching blast results' ids
table switch is in database D:\temp\RtmpgpPAz5/temp.db
Index switch_old_index is created