Nothing
# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
hasher <- function(x, hash_size) {
.Call(`_text2vec_hasher`, x, hash_size)
}
cpp_hash_corpus_create <- function(size, n_min, n_max, use_signed_hash) {
.Call(`_text2vec_cpp_hash_corpus_create`, size, n_min, n_max, use_signed_hash)
}
cpp_hash_corpus_insert_document_batch <- function(ptr, docs_batch, grow_dtm, context, window_size, weights) {
invisible(.Call(`_text2vec_cpp_hash_corpus_insert_document_batch`, ptr, docs_batch, grow_dtm, context, window_size, weights))
}
cpp_hash_corpus_get_tcm <- function(ptr) {
.Call(`_text2vec_cpp_hash_corpus_get_tcm`, ptr)
}
cpp_hash_corpus_get_dtm <- function(ptr) {
.Call(`_text2vec_cpp_hash_corpus_get_dtm`, ptr)
}
cpp_vocabulary_corpus_create <- function(vocab_R, n_min, n_max, stopwords_R, delim) {
.Call(`_text2vec_cpp_vocabulary_corpus_create`, vocab_R, n_min, n_max, stopwords_R, delim)
}
cpp_vocabulary_corpus_insert_document_batch <- function(ptr, docs_batch, grow_dtm, context, window_size, weights, flag_binary_cooccurence = 0L) {
invisible(.Call(`_text2vec_cpp_vocabulary_corpus_insert_document_batch`, ptr, docs_batch, grow_dtm, context, window_size, weights, flag_binary_cooccurence))
}
cpp_vocabulary_corpus_get_tcm <- function(ptr) {
.Call(`_text2vec_cpp_vocabulary_corpus_get_tcm`, ptr)
}
cpp_vocabulary_corpus_get_dtm <- function(ptr) {
.Call(`_text2vec_cpp_vocabulary_corpus_get_dtm`, ptr)
}
cpp_vocab_create <- function(ngram_min, ngram_max, stopwords_R, delim, window_size) {
.Call(`_text2vec_cpp_vocab_create`, ngram_min, ngram_max, stopwords_R, delim, window_size)
}
cpp_vocabulary_insert_document_batch <- function(ptr, document_batch) {
invisible(.Call(`_text2vec_cpp_vocabulary_insert_document_batch`, ptr, document_batch))
}
cpp_vocabulary_insert_document_batch_xptr <- function(ptr, document_batch_ptr) {
invisible(.Call(`_text2vec_cpp_vocabulary_insert_document_batch_xptr`, ptr, document_batch_ptr))
}
cpp_get_vocab_statistics <- function(ptr) {
.Call(`_text2vec_cpp_get_vocab_statistics`, ptr)
}
cpp_get_document_count <- function(ptr) {
.Call(`_text2vec_cpp_get_document_count`, ptr)
}
create_xptr_unordered_set <- function(x) {
.Call(`_text2vec_create_xptr_unordered_set`, x)
}
collapse_collocations_cpp <- function(docs, xptr_unordered_set_phrases, xptr_unordered_set_stopwords, r_sep) {
.Call(`_text2vec_collapse_collocations_cpp`, docs, xptr_unordered_set_phrases, xptr_unordered_set_stopwords, r_sep)
}
colMins <- function(x) {
.Call(`_text2vec_colMins`, x)
}
colMaxs <- function(x) {
.Call(`_text2vec_colMaxs`, x)
}
rowMins <- function(x) {
.Call(`_text2vec_rowMins`, x)
}
rowMaxs <- function(x) {
.Call(`_text2vec_rowMaxs`, x)
}
euclidean_dist <- function(x, y) {
.Call(`_text2vec_euclidean_dist`, x, y)
}
malloc_trim <- function() {
.Call(`_text2vec_malloc_trim`)
}
is_invalid_ptr <- function(sexp_ptr) {
.Call(`_text2vec_is_invalid_ptr`, sexp_ptr)
}
cpp_fixed_char_tokenizer <- function(x, delim) {
.Call(`_text2vec_cpp_fixed_char_tokenizer`, x, delim)
}
warplda_create <- function(n_topics, doc_topic_prior, topic_word_prior) {
.Call(`_text2vec_warplda_create`, n_topics, doc_topic_prior, topic_word_prior)
}
warplda_init_dtm <- function(ptr, m, z_old, z_new, seeds) {
invisible(.Call(`_text2vec_warplda_init_dtm`, ptr, m, z_old, z_new, seeds))
}
warplda_set_topic_word_count <- function(ptr, topic_word_count) {
invisible(.Call(`_text2vec_warplda_set_topic_word_count`, ptr, topic_word_count))
}
run_one_iter_doc <- function(ptr, update_topics = TRUE) {
invisible(.Call(`_text2vec_run_one_iter_doc`, ptr, update_topics))
}
run_one_iter_word <- function(ptr, update_topics = TRUE) {
invisible(.Call(`_text2vec_run_one_iter_word`, ptr, update_topics))
}
warplda_pseudo_loglikelihood <- function(ptr) {
.Call(`_text2vec_warplda_pseudo_loglikelihood`, ptr)
}
warplda_get_doc_topic_count <- function(ptr) {
.Call(`_text2vec_warplda_get_doc_topic_count`, ptr)
}
warplda_get_topic_word_count <- function(ptr) {
.Call(`_text2vec_warplda_get_topic_word_count`, ptr)
}
warplda_get_local_diff <- function(ptr) {
.Call(`_text2vec_warplda_get_local_diff`, ptr)
}
warplda_get_c_global <- function(ptr) {
.Call(`_text2vec_warplda_get_c_global`, ptr)
}
warplda_set_c_global <- function(ptr, c_all) {
invisible(.Call(`_text2vec_warplda_set_c_global`, ptr, c_all))
}
warplda_reset_local_diff <- function(ptr) {
invisible(.Call(`_text2vec_warplda_reset_local_diff`, ptr))
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.