logoP SNP adj
This commit is contained in:
parent
56a6aa8c7e
commit
ac78fe16cd
1 changed files with 4 additions and 0 deletions
|
@ -51,6 +51,10 @@ LogoPlotSnps <- function(plot_df
|
||||||
)
|
)
|
||||||
|
|
||||||
{
|
{
|
||||||
|
# handle funky omit_snp_count. DOES NOT WORK YET
|
||||||
|
if (class(omit_snp_count != 'numeric')){
|
||||||
|
omit_snp_count <- as.numeric(unlist(str_extract_all(thing, regex("[0-9]"))))
|
||||||
|
}
|
||||||
############################################
|
############################################
|
||||||
# Data processing for logo plot for nsSNPS
|
# Data processing for logo plot for nsSNPS
|
||||||
############################################
|
############################################
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue