# below are suggested inputs for different types of experiments
db <- system.file("extdata", "Bacteria_175seqs.sqlite", package="DECIPHER")
## Not run:
# # High Resolution Melt (HRM) assay:
# primers <- DesignSignatures(db,
# resolution=seq(80, 100, 0.25), # degrees Celsius
# minProductSize=55, # base pairs
# maxProductSize=400)
#
# # Primers for next-generation sequencing:
# primers <- DesignSignatures(db,
# type="sequence",
# minProductSize=300, # base pairs
# maxProductSize=700,
# resolution=5, # 5-mers
# levels=5)
#
# # Primers for community fingerprinting:
# primers <- DesignSignatures(db,
# type="length",
# levels=2, # presence/absence
# minProductSize=200, # base pairs
# maxProductSize=1400,
# resolution=c(seq(200, 700, 3),
# seq(705, 1000, 5),
# seq(1010, 1400, 10)))
#
# # Primers for restriction fragment length polymorphism (RFLP):
# data(RESTRICTION_ENZYMES)
# myEnzymes <- RESTRICTION_ENZYMES[c("EcoRI", "HinfI", "SalI")]
# primers <- DesignSignatures(db,
# type="length",
# levels=2, # presence/absence
# minProductSize=200, # base pairs
# maxProductSize=600,
# resolution=c(seq(50, 100, 3),
# seq(105, 200, 5),
# seq(210, 600, 10)),
# enzymes=myEnzymes)
# ## End(Not run)
Run the code above in your browser using DataLab