From b6c98476ce46d16a8beaa1f4fca4127fc070e131 Mon Sep 17 00:00:00 2001 From: chainsawriot Date: Fri, 9 Feb 2024 15:56:10 +0100 Subject: [PATCH] Fix doc --- R/oolong.R | 6 ++++-- man/create_oolong.Rd | 6 ++++-- 2 files changed, 8 insertions(+), 4 deletions(-) diff --git a/R/oolong.R b/R/oolong.R index b920f3c..ecc2b32 100644 --- a/R/oolong.R +++ b/R/oolong.R @@ -75,9 +75,11 @@ Oolong_test <- R6::R6Class( #' data(abstracts) #' oolong_test <- wi(input_model = abstracts_seededlda, userid = "Hadley") #' ## Creation of oolong test with both word intrusion test and topic intrusion test -#' oolong_test <- witi(input_model = abstracts_seededlda, input_corpus = abstracts$text, userid = "Julia") +#' oolong_test <- witi(input_model = abstracts_seededlda, +#' input_corpus = abstracts$text, userid = "Julia") #' ## Creation of oolong test with topic intrusion test -#' oolong_test <- ti(input_model = abstracts_seededlda, input_corpus = abstracts$text, userid = "Jenny") +#' oolong_test <- ti(input_model = abstracts_seededlda, +#' input_corpus = abstracts$text, userid = "Jenny") #' ## Creation of oolong test with word set intrusion test #' oolong_test <- wsi(input_model = abstracts_seededlda, userid = "Garrett") #' ## Creation of gold standard diff --git a/man/create_oolong.Rd b/man/create_oolong.Rd index 4800a52..4020988 100644 --- a/man/create_oolong.Rd +++ b/man/create_oolong.Rd @@ -175,9 +175,11 @@ data(abstracts_seededlda) data(abstracts) oolong_test <- wi(input_model = abstracts_seededlda, userid = "Hadley") ## Creation of oolong test with both word intrusion test and topic intrusion test -oolong_test <- witi(input_model = abstracts_seededlda, input_corpus = abstracts$text, userid = "Julia") +oolong_test <- witi(input_model = abstracts_seededlda, +input_corpus = abstracts$text, userid = "Julia") ## Creation of oolong test with topic intrusion test -oolong_test <- ti(input_model = abstracts_seededlda, input_corpus = abstracts$text, userid = "Jenny") +oolong_test <- ti(input_model = abstracts_seededlda, +input_corpus = abstracts$text, userid = "Jenny") ## Creation of oolong test with word set intrusion test oolong_test <- wsi(input_model = abstracts_seededlda, userid = "Garrett") ## Creation of gold standard