remove the second append_table for iris in examples for reporter and renderer

Author: donyunardi

R/Renderer.R

@@ -62,7 +62,6 @@ Renderer <- R6::R6Class( # nolint: object_name_linter.
     #' lyt <- analyze(split_rows_by(basic_table(), "Day"), "Ozone", afun = mean)
     #' table_res2 <- build_table(lyt, airquality)
     #' card2$append_table(table_res2)
-    #' card2$append_table(iris)
     #' card2$append_rcode("2+2", echo = FALSE)
     #'
     #' reporter <- Reporter$new()
@@ -165,7 +164,6 @@ Renderer <- R6::R6Class( # nolint: object_name_linter.
     #' lyt <- analyze(split_rows_by(basic_table(), "Day"), "Ozone", afun = mean)
     #' table_res2 <- build_table(lyt, airquality)
     #' card2$append_table(table_res2)
-    #' card2$append_table(iris)
     #' card2$append_rcode("2+2", echo = FALSE)
     #'
     #' reporter <- Reporter$new()

R/Reporter.R

@@ -44,7 +44,6 @@ Reporter <- R6::R6Class( # nolint: object_name_linter.
     #' lyt <- analyze(split_rows_by(basic_table(), "Day"), "Ozone", afun = mean)
     #' table_res2 <- build_table(lyt, airquality)
     #' card2$append_table(table_res2)
-    #' card2$append_table(iris)
     #'
     #' reporter <- Reporter$new()
     #' reporter$append_cards(list(card1, card2))
@@ -76,7 +75,6 @@ Reporter <- R6::R6Class( # nolint: object_name_linter.
     #' lyt <- analyze(split_rows_by(basic_table(), "Day"), "Ozone", afun = mean)
     #' table_res2 <- build_table(lyt, airquality)
     #' card2$append_table(table_res2)
-    #' card2$append_table(iris)
     #'
     #' reporter <- Reporter$new()
     #' reporter$append_cards(list(card1, card2))
@@ -108,7 +106,6 @@ Reporter <- R6::R6Class( # nolint: object_name_linter.
     #' lyt <- analyze(split_rows_by(basic_table(), "Day"), "Ozone", afun = mean)
     #' table_res2 <- build_table(lyt, airquality)
     #' card2$append_table(table_res2)
-    #' card2$append_table(iris)
     #'
     #' reporter <- Reporter$new()
     #' reporter$append_cards(list(card1, card2))