diff --git a/docs/articles/adult-algorithm.html b/docs/articles/adult-algorithm.html index 3bd2cb6..005f2e3 100644 --- a/docs/articles/adult-algorithm.html +++ b/docs/articles/adult-algorithm.html @@ -116,7 +116,7 @@
vignettes/adult-algorithm.Rmd
adult-algorithm.Rmd
vignettes/configuration.Rmd
configuration.Rmd
vignettes/developer-guidelines.Rmd
developer-guidelines.Rmd
vignettes/installation.Rmd
installation.Rmd
vignettes/large-data-sets.Rmd
large-data-sets.Rmd
vignettes/next-steps.Rmd
next-steps.Rmd
vignettes/output.Rmd
output.Rmd
vignettes/prelim-infants-algorithm.Rmd
prelim-infants-algorithm.Rmd
vignettes/quickstart.Rmd
quickstart.Rmd
vignettes/usage.Rmd
usage.Rmd
vignettes/utilities.Rmd
utilities.Rmd
# Run on a small subset of given data
+ # \donttest{
+# Run on a small subset of given data
df <- as.data.frame(syngrowth)
df <- df[df$subjid %in% unique(df[, "subjid"])[1:2], ]
df <- cbind(df,
@@ -210,6 +211,7 @@ Examples
# Specify all inclusion codes
wide_df <- longwide(df, inclusion_types = c("Include", "Exclude-Carried-Forward"))
+# }
# Simple usage
+ # \donttest{
+# Simple usage
# Run on a small subset of given data
df <- as.data.frame(syngrowth)
df <- df[df$subjid %in% unique(df[, "subjid"])[1:2], ]
@@ -144,6 +145,7 @@ Examples
colnames(wide_df)[colnames(wide_df) %in% c("wt", "ht")] <-
c("weight", "height")
wide_df_with_bmi <- simple_bmi(wide_df, wtcol = "weight", htcol = "height")
+# }