R/RcppExports.R

In unine: Unine Light Stemmer

# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

#' Stem Finnish words
#'
#' Stemmer for Finnish words
#'
#' @param words a [character] containing the original words.
#' @return [character] with stemmed words.
#' @examples
#' finnish_stemmer(c("taivas"))
#' @export
finnish_stemmer <- function(words) {
    .Call(`_unine_finnish_stemmer`, words)
}

#' Stem French words
#'
#' Stemmer for French words
#'
#' @param words a [character] containing the original words.
#' @return [character] with stemmed words.
#' @examples
#' french_stemmer(c("tester", "testament", "clients"))
#' @export
french_stemmer <- function(words) {
    .Call(`_unine_french_stemmer`, words)
}

#' Stem German words
#'
#' Stemmer for German words
#'
#' @param words a [character] containing the original words.
#' @return [character] with stemmed words.
#' @examples
#' german_stemmer(c("kinder"))
#' @export
german_stemmer <- function(words) {
    .Call(`_unine_german_stemmer`, words)
}

#' Stem Italian words
#'
#' Stemmer for Italian words
#'
#' @param words a [character] containing the original words.
#' @return [character] with stemmed words.
#' @examples
#' italian_stemmer(c("arrivederci"))
#' @export
italian_stemmer <- function(words) {
    .Call(`_unine_italian_stemmer`, words)
}

#' Stem Portuguese words
#'
#' Stemmer for Portuguese words
#'
#' @param words a [character] containing the original words.
#' @return [character] with stemmed words.
#' @examples
#' portuguese_stemmer(c("adeus"))
#' @export
portuguese_stemmer <- function(words) {
    .Call(`_unine_portuguese_stemmer`, words)
}

#' Stem Spanish words
#'
#' Stemmer for Spanish words
#'
#' @param words a [character] containing the original words.
#' @return [character] with stemmed words.
#' @examples
#' spanish_stemmer(c("perros"))
#' @export
spanish_stemmer <- function(words) {
    .Call(`_unine_spanish_stemmer`, words)
}

#' Stem Swedish words
#'
#' Stemmer for Swedish words
#'
#' @param words a [character] containing the original words.
#' @return [character] with stemmed words.
#' @examples
#' swedish_stemmer(c("stiga"))
#' @export
swedish_stemmer <- function(words) {
    .Call(`_unine_swedish_stemmer`, words)
}