Break up database example to not be truncated

CharnelMouse · Nov 7, 2024 · 4158903 · 4158903
1 parent 881c0ca
commit 4158903
Show file tree

Hide file tree

Showing 2 changed files with 40 additions and 10 deletions.
diff --git a/R/database.r b/R/database.r
@@ -144,11 +144,26 @@
 #' db_merge <- database(
 #'   relation(
 #'     list(
-#'       a = list(df = data.frame(a = logical(), b = logical()), keys = list("a")),
-#'       b = list(df = data.frame(b = logical(), c = logical(), d = logical()), keys = list("b")),
-#'       c_d = list(df = data.frame(c = logical(), d = logical(), e = logical()), keys = list(c("c", "d"))),
-#'       a.1 = list(df = data.frame(a = logical(), b = logical()), keys = list("a")),
-#'       b.1 = list(df = data.frame(b = logical(), c = logical(), d = logical()), keys = list("b"))
+#'       a = list(
+#'         df = data.frame(a = logical(), b = logical()),
+#'         keys = list("a")
+#'       ),
+#'       b = list(
+#'         df = data.frame(b = logical(), c = logical(), d = logical()),
+#'         keys = list("b")
+#'       ),
+#'       c_d = list(
+#'         df = data.frame(c = logical(), d = logical(), e = logical()),
+#'         keys = list(c("c", "d"))
+#'       ),
+#'       a.1 = list(
+#'         df = data.frame(a = logical(), b = logical()),
+#'         keys = list("a")
+#'       ),
+#'       b.1 = list(
+#'         df = data.frame(b = logical(), c = logical(), d = logical()),
+#'         keys = list("b")
+#'       )
 #'     ),
 #'     c("a", "b", "c", "d", "e")
 #'   ),

diff --git a/man/database.Rd b/man/database.Rd