commit package

.Rbuildignore

+^lsfun\.Rproj$
+^\.Rproj\.user$

.gitignore

+.Rproj.user

DESCRIPTION

 Package: lsfun
-Title: Helper functions for interacting with LimeSurvey from within R
-Version: 0.0.1
-Authors@R: person(given = "Oliver",
-           family = "Purschke",
-           role = c("aut", "cre"),
-           email = "oliver.purschke@uk-halle.de",
-           comment = c(ORCID = "0000-0003-0444-0882"))
-Description: Contains some helper functions to interact with LimeSurvey
-License: GNU General Public License v3.0
+Title: What the Package Does (One Line, Title Case)
+Version: 0.0.0.9000
+Authors@R: 
+    person("First", "Last", , "first.last@example.com", role = c("aut", "cre"),
+           comment = c(ORCID = "YOUR-ORCID-ID"))
+Description: What the package does (one paragraph).
+License: `use_mit_license()`, `use_gpl3_license()` or friends to pick a
+    license
 Encoding: UTF-8
-LazyData: true
-RoxygenNote: 7.2.3
+Roxygen: list(markdown = TRUE)
+RoxygenNote: 7.2.0

NAMESPACE

+# Generated by roxygen2: do not edit by hand
+
+export(digi_lime_get_part_chunks)

R/digi_lime_get_part_chunks.r

+#' Read large participant table in chunks
+#'
+#' @description digi_lime_get_part_chunks()
+#'
+#' @param surv_id Survey ID
+#' @param max_tn Maximum number to participants
+#' @param chunk_size Size of a single chunk
+#' @param attributes Additional attributes to read
+#'
+#' @return ...
+#' @export
+#' @examples
+#' digi_lime_get_part_chunks()
+#'
+digi_lime_get_part_chunks <-
+    function(surv_id,
+             max_tn,
+             chunk_size,
+             attributes) {
+        seq_vec <- seq(1, max_tn, chunk_size)
+        seq_vec %>%
+            map_dfr(
+                .,
+                ~
+                    get_participants(
+                        iSurveyID = surv_id,
+                        iStart = .,
+                        iLimit = chunk_size,
+                        bUnused = FALSE,
+                        aAttributes = attributes
+                    )
+            ) %>%
+            as_tibble() %>%
+            distinct() %>%
+            filter(!is.na(tid))
+    }

lsfun.Rproj

+Version: 1.0
+
+RestoreWorkspace: No
+SaveWorkspace: No
+AlwaysSaveHistory: Default
+
+EnableCodeIndexing: Yes
+Encoding: UTF-8
+
+AutoAppendNewline: Yes
+StripTrailingWhitespace: Yes
+LineEndingConversion: Posix
+
+BuildType: Package
+PackageUseDevtools: Yes
+PackageInstallArgs: --no-multiarch --with-keep.source
+PackageRoxygenize: rd,collate,namespace

man/digi_lime_get_part_chunks.Rd

+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/digi_lime_get_part_chunks.r
+\name{digi_lime_get_part_chunks}
+\alias{digi_lime_get_part_chunks}
+\title{Read large participant table in chunks}
+\usage{
+digi_lime_get_part_chunks(surv_id, max_tn, chunk_size, attributes)
+}
+\arguments{
+\item{surv_id}{Survey ID}
+
+\item{max_tn}{Maximum number to participants}
+
+\item{chunk_size}{Size of a single chunk}
+
+\item{attributes}{Additional attributes to read}
+}
+\value{
+...
+}
+\description{
+digi_lime_get_part_chunks()
+}
+\examples{
+digi_lime_get_part_chunks()
+
+}