UPDATE

.github/workflows/docker-publish.yml

@@ -14,9 +14,6 @@ jobs:
      fail-fast: false
      matrix:
        config:
-         - {os: macos-latest, r: 'release'}
-         - {os: windows-latest, r: 'release'}
-         - {os: ubuntu-latest, r: 'devel', http-user-agent: 'release'}
          - {os: ubuntu-latest, r: 'release'}
    env:
      GITHUB_PAT: ${{ secrets.GITHUB_TOKEN }}

R/flair_nn.R

@@ -38,7 +38,7 @@ flair_nn <- function() {
 
 #' @title Initializing a Class for Flair Classifier
 #'
-#' @description This function interfaces with Python via the {reticulate} package
+#' @description This function interfaces with Python via the reticulate package
 #' to create a Classifier object from the Flair library.
 #'
 #' @return A Flair Classifier class instance.

R/predict_label.R

@@ -33,9 +33,11 @@
 #' )
 #' }
 #'
-#' @import flaiR
+#' @importFrom reticulate import
 #' @export
 predict_label <- function(text, classifier, sentence = NULL) {
+  # Import Sentence class from flair
+  Sentence <- reticulate::import("flair")$data$Sentence
 
   # Check if classifier is valid
   if (is.null(classifier) || !isTRUE(class(classifier)[1] == "flair.models.text_classification_model.TextClassifier")) {
@@ -64,7 +66,6 @@ predict_label <- function(text, classifier, sentence = NULL) {
     if (!inherits(sentence, "flair.data.Sentence")) {
       stop("Invalid sentence object. Must be a Flair Sentence instance.")
     }
-
     if (!("tokens" %in% names(sentence)) || length(sentence$tokens) == 0) {
       stop("Invalid sentence object: No tokens found.")
     }