# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
read_snpData <- function(file, sep, quote, rowNames, na_str, nrows) {
.Call('_qtcat_read_snpData', PACKAGE = 'qtcat', file, sep, quote, rowNames, na_str, nrows)
}
corDist <- function(x, y) {
.Call('_qtcat_corDist', PACKAGE = 'qtcat', x, y)
}
corDists <- function(x) {
.Call('_qtcat_corDists', PACKAGE = 'qtcat', x)
}
corPreIdenticals <- function(x, step) {
.Call('_qtcat_corPreIdenticals', PACKAGE = 'qtcat', x, step)
}
corIdenticals <- function(x, clustIdx) {
.Call('_qtcat_corIdenticals', PACKAGE = 'qtcat', x, clustIdx)
}
joinCorIdenticals <- function(n, preclust, ClustMedo) {
.Call('_qtcat_joinCorIdenticals', PACKAGE = 'qtcat', n, preclust, ClustMedo)
}
corClarans <- function(x, k, maxNeigbours) {
.Call('_qtcat_corClarans', PACKAGE = 'qtcat', x, k, maxNeigbours)
}
corMedoids <- function(x, clusters) {
.Call('_qtcat_corMedoids', PACKAGE = 'qtcat', x, clusters)
}
design <- function(x) {
.Call('_qtcat_design', PACKAGE = 'qtcat', x)
}
afreq <- function(x, maf) {
.Call('_qtcat_afreq', PACKAGE = 'qtcat', x, maf)
}
hetfreq <- function(x, dim) {
.Call('_qtcat_hetfreq', PACKAGE = 'qtcat', x, dim)
}
nafreq <- function(x, dim) {
.Call('_qtcat_nafreq', PACKAGE = 'qtcat', x, dim)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.