# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
curve_fitting_c <- function(xr, yr, minbound, maxbound, equation, control, verbose = TRUE) {
.Call(`_MetaProfiler_curve_fitting_c`, xr, yr, minbound, maxbound, equation, control, verbose)
}
curve_fitting_test_c <- function(xr, yr, minbound, maxbound, equation, control, verbose = TRUE) {
.Call(`_MetaProfiler_curve_fitting_test_c`, xr, yr, minbound, maxbound, equation, control, verbose)
}
get_accessions <- function(files, proteins) {
.Call(`_MetaProfiler_get_accessions`, files, proteins)
}
read_fasta <- function(files) {
.Call(`_MetaProfiler_read_fasta`, files)
}
specific_fasta <- function(db, proteins, filename) {
invisible(.Call(`_MetaProfiler_specific_fasta`, db, proteins, filename))
}
trypsin_digestion <- function(files, missed_cleavage, min_length, max_length) {
.Call(`_MetaProfiler_trypsin_digestion`, files, missed_cleavage, min_length, max_length)
}
create_random_fasta <- function(files, filename, db_size, add_with = "", add_decoy = TRUE, decoy_prefix = "DECOY_") {
invisible(.Call(`_MetaProfiler_create_random_fasta`, files, filename, db_size, add_with, add_decoy, decoy_prefix))
}
fasta_size <- function(files) {
.Call(`_MetaProfiler_fasta_size`, files)
}
qtclust_c <- function(m, n_groups, id, groups, radius, method, start, end, merge_overlaps, element_wise, verbose) {
.Call(`_MetaProfiler_qtclust_c`, m, n_groups, id, groups, radius, method, start, end, merge_overlaps, element_wise, verbose)
}
razor <- function(x, id, unique, verbose = TRUE) {
.Call(`_MetaProfiler_razor`, x, id, unique, verbose)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.