diff --git a/man/tm_g_gh_boxplot.Rd b/man/tm_g_gh_boxplot.Rd
index fa462ec6..32dd9cdd 100644
--- a/man/tm_g_gh_boxplot.Rd
+++ b/man/tm_g_gh_boxplot.Rd
@@ -171,7 +171,7 @@ data <- within(data, {
 })
 
 datanames <- c("ADSL", "ADLB")
-datanames(data)<- datanames
+datanames(data) <- datanames
 
 join_keys(data) <- cdisc_join_keys(!!!datanames)
 
diff --git a/man/tm_g_gh_correlationplot.Rd b/man/tm_g_gh_correlationplot.Rd
index 8a3b421c..155323a0 100644
--- a/man/tm_g_gh_correlationplot.Rd
+++ b/man/tm_g_gh_correlationplot.Rd
@@ -169,13 +169,13 @@ data <- within(data, {
     )) \%>\%
     # use ARMCD values to order treatment in visualization legend
     dplyr::mutate(TRTORD = ifelse(grepl("C", ARMCD), 1,
-                                  ifelse(grepl("B", ARMCD), 2,
-                                         ifelse(grepl("A", ARMCD), 3, NA)
-                                  )
+      ifelse(grepl("B", ARMCD), 2,
+        ifelse(grepl("A", ARMCD), 3, NA)
+      )
     )) \%>\%
     dplyr::mutate(ARM = as.character(arm_mapping[match(ARM, names(arm_mapping))])) \%>\%
     dplyr::mutate(ARM = factor(ARM) \%>\%
-                    reorder(TRTORD)) \%>\%
+      reorder(TRTORD)) \%>\%
     dplyr::mutate(
       ANRHI = dplyr::case_when(
         PARAMCD == "ALT" ~ 60,
diff --git a/man/tm_g_gh_density_distribution_plot.Rd b/man/tm_g_gh_density_distribution_plot.Rd
index 3c0072b8..41e636e5 100644
--- a/man/tm_g_gh_density_distribution_plot.Rd
+++ b/man/tm_g_gh_density_distribution_plot.Rd
@@ -86,7 +86,6 @@ None
 # Example using ADaM structure analysis dataset.
 data <- teal_data()
 data <- within(data, {
-
   library(dplyr)
   # original ARM value = dose value
   arm_mapping <- list(
@@ -128,7 +127,7 @@ data <- within(data, {
 })
 
 datanames <- c("ADSL", "ADLB")
-datanames(data)<- datanames
+datanames(data) <- datanames
 join_keys(data) <- cdisc_join_keys(!!!datanames)
 
 app <- teal::init(
diff --git a/man/tm_g_gh_lineplot.Rd b/man/tm_g_gh_lineplot.Rd
index 175eb1d7..2532eb3b 100644
--- a/man/tm_g_gh_lineplot.Rd
+++ b/man/tm_g_gh_lineplot.Rd
@@ -168,7 +168,7 @@ data <- within(data, {
 })
 
 datanames <- c("ADSL", "ADLB")
-datanames(data)<- datanames
+datanames(data) <- datanames
 join_keys(data) <- cdisc_join_keys(!!!datanames)
 
 app <- teal::init(
diff --git a/man/tm_g_gh_scatterplot.Rd b/man/tm_g_gh_scatterplot.Rd
index 60f854ce..715e938a 100644
--- a/man/tm_g_gh_scatterplot.Rd
+++ b/man/tm_g_gh_scatterplot.Rd
@@ -130,7 +130,7 @@ data <- within(data, {
 })
 
 datanames <- c("ADSL", "ADLB")
-datanames(data)<- datanames
+datanames(data) <- datanames
 join_keys(data) <- cdisc_join_keys(!!!datanames)
 
 
diff --git a/man/tm_g_gh_spaghettiplot.Rd b/man/tm_g_gh_spaghettiplot.Rd
index e701b244..d9c86f3a 100644
--- a/man/tm_g_gh_spaghettiplot.Rd
+++ b/man/tm_g_gh_spaghettiplot.Rd
@@ -170,10 +170,10 @@ data <- within(data, {
     dplyr::rowwise() \%>\%
     dplyr::group_by(PARAMCD) \%>\%
     dplyr::mutate(LBSTRESC = ifelse(USUBJID \%in\% sample(USUBJID, 1, replace = TRUE),
-                                    paste("<", round(runif(1, min = 25, max = 30))), LBSTRESC
+      paste("<", round(runif(1, min = 25, max = 30))), LBSTRESC
     )) \%>\%
     dplyr::mutate(LBSTRESC = ifelse(USUBJID \%in\% sample(USUBJID, 1, replace = TRUE),
-                                    paste(">", round(runif(1, min = 70, max = 75))), LBSTRESC
+      paste(">", round(runif(1, min = 70, max = 75))), LBSTRESC
     )) \%>\%
     ungroup()
   attr(ADLB[["ARM"]], "label") <- var_labels[["ARM"]]
@@ -187,7 +187,7 @@ data <- within(data, {
 })
 
 datanames <- c("ADSL", "ADLB")
-datanames(data)<- datanames
+datanames(data) <- datanames
 join_keys(data) <- cdisc_join_keys(!!!datanames)
 
 app <- teal::init(