a few test cases in examples for #13

rstudio · Feb 11, 2015 · 7dd8547 · 7dd8547
1 parent e6ee2fa
commit 7dd8547
Show file tree

Hide file tree

Showing 2 changed files with 14 additions and 0 deletions.
diff --git a/inst/examples/datatable.R b/inst/examples/datatable.R
@@ -30,3 +30,10 @@ datatable(as.data.frame(m))
 m = data.frame(a = 1, b = 2, c = 3)
 datatable(m)
 datatable(as.matrix(m))
+
+# dates
+datatable(data.frame(
+  date = seq(as.Date("2015-01-01"), by = "day", length.out = 5), x = 1:5
+))
+datatable(data.frame(x = Sys.Date()))
+datatable(data.frame(x = Sys.time()))
diff --git a/man/datatable.Rd b/man/datatable.Rd
@@ -84,4 +84,11 @@ datatable(as.data.frame(m))
 m = data.frame(a = 1, b = 2, c = 3)
 datatable(m)
 datatable(as.matrix(m))
+
+# dates
+datatable(data.frame(
+  date = seq(as.Date("2015-01-01"), by = "day", length.out = 5), x = 1:5
+))
+datatable(data.frame(x = Sys.Date()))
+datatable(data.frame(x = Sys.time()))
 }