whichsignatures not working

[temizna]

mut.sigs.tcga.breast<-whichSignatures(tumor.ref=contexts.tcga.breast,sample.id=rownames(contexts.tcga.breast),signatures.ref = signatures.nature2013,signature.cutError in signatures[, zero.contexts] : subscript out of bounds
In addition: Warning messages:
1: In if (!sample.id %in% rownames(tumor)) { :
the condition has length > 1 and only the first element will be used
2: In if (round(rowSums(tumor), digits = 1) != 1) { :
the condition has length > 1 and only the first element will be used

traceback()
2: which(signatures[, zero.contexts] >= 0.2, arr.ind = T)
1: whichSignatures(tumor.ref = contexts.tcga.breast, sample.id = rownames(contexts.tcga.breast),
signatures.ref = signatures.nature2013, signature.cutoff = 0.05)
I have also seen errors in your get_error function with negative error

R.3.6.3