plotGmmThreshold: Plot findThreshold results for the gmm method

Description Usage Arguments Value See Also Examples

View source: R/DistToNearest.R

Description

plotGmmThreshold plots the results from "gmm" method of findThreshold, including the Gaussian distributions, input nearest neighbor distance histogram, and threshold selected.

Usage

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
plotGmmThreshold(
  data,
  cross = NULL,
  xmin = NULL,
  xmax = NULL,
  breaks = NULL,
  binwidth = NULL,
  title = NULL,
  size = 1,
  silent = FALSE,
  ...
)

Arguments

data

GmmThreshold object output by the "gmm" method of findThreshold.

cross

numeric vector of distances from distToNearest to draw as a histogram below the data histogram for comparison purposes.

xmin

minimum limit for plotting the x-axis. If NULL the limit will be set automatically.

xmax

maximum limit for plotting the x-axis. If NULL the limit will be set automatically.

breaks

number of breaks to show on the x-axis. If NULL the breaks will be set automatically.

binwidth

binwidth for the histogram. If NULL the binwidth will be set automatically.

title

string defining the plot title.

size

numeric value for lines in the plot.

silent

if TRUE do not draw the plot and just return the ggplot2 object; if FALSE draw the plot.

...

additional arguments to pass to ggplot2::theme.

Value

A ggplot object defining the plot.

See Also

See GmmThreshold for the the input object definition and findThreshold for generating the input object. See distToNearest calculating nearest neighbor distances.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
# Subset example data to one sample as a demo
data(ExampleDb, package="alakazam")
db <- subset(ExampleDb, sample_id == "-1h")

# Use nucleotide Hamming distance and normalize by junction length
db <- distToNearest(db, sequenceColumn="junction", vCallColumn="v_call_genotyped",
                    jCallColumn="j_call", model="ham", normalize="len", nproc=1)

# To find the threshold cut, call findThreshold function for "gmm" method.
output <- findThreshold(db$dist_nearest, method="gmm", model="norm-norm", cutoff="opt")
print(output)

# Plot results
plotGmmThreshold(output, binwidth=0.02)

shazam documentation built on July 9, 2021, 1:07 a.m.