From d8b04906fae5934e154479e7bbf0672ae49662e6 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Thu, 14 Aug 2025 22:45:38 +0000 Subject: [PATCH 1/4] Initial plan From d8b6bfaf4b5d41b0227e016590cd20127dc65541 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Thu, 14 Aug 2025 22:52:50 +0000 Subject: [PATCH 2/4] Fix README.Rmd syntax error in finisher() function call Co-authored-by: DataStrategist <8094091+DataStrategist@users.noreply.github.com> --- ..Rcheck/00check.log | 31 ------------------------------- .gitignore | 1 + README.Rmd | 3 ++- 3 files changed, 3 insertions(+), 32 deletions(-) delete mode 100644 ..Rcheck/00check.log diff --git a/..Rcheck/00check.log b/..Rcheck/00check.log deleted file mode 100644 index 1d666e9..0000000 --- a/..Rcheck/00check.log +++ /dev/null @@ -1,31 +0,0 @@ -* using log directory ‘/home/runner/work/TileMaker/TileMaker/..Rcheck’ -* using R version 4.3.3 (2024-02-29) -* using platform: x86_64-pc-linux-gnu (64-bit) -* R was compiled by - gcc (Ubuntu 13.2.0-23ubuntu3) 13.2.0 - GNU Fortran (Ubuntu 13.2.0-23ubuntu3) 13.2.0 -* running under: Ubuntu 24.04.2 LTS -* using session charset: UTF-8 -* using options ‘--no-examples --no-tests --no-vignettes’ -* checking for file ‘./DESCRIPTION’ ... OK -* checking extension type ... Package -* this is package ‘TileMaker’ version ‘0.2.9’ -* package encoding: UTF-8 -* checking package namespace information ... OK -* checking package dependencies ... ERROR -Packages required but not available: - 'htmltools', 'purrr', 'dplyr', 'rlang', 'tibble' - -Packages suggested but not available: - 'testthat', 'knitr', 'rmarkdown', 'ggplot2' - -VignetteBuilder package required for checking but not installed: ‘knitr’ - -The suggested packages are required for a complete check. -Checking can be attempted without them by setting the environment -variable _R_CHECK_FORCE_SUGGESTS_ to a false value. - -See section ‘The DESCRIPTION file’ in the ‘Writing R Extensions’ -manual. -* DONE -Status: 1 ERROR diff --git a/.gitignore b/.gitignore index 44037ef..3196388 100644 --- a/.gitignore +++ b/.gitignore @@ -17,3 +17,4 @@ vignettes/*.pdf .httr-oauth .Rproj.user inst/doc +..Rcheck/ diff --git a/README.Rmd b/README.Rmd index 33e1af9..db60820 100644 --- a/README.Rmd +++ b/README.Rmd @@ -46,6 +46,7 @@ finisher( title = "Important Reportings", css = "https://maxcdn.bootstrapcdn.com/bootstrap/3.3.7/css/bootstrap.min.css", file = NULL, - textModifier = "h1",div_maker(subtitle = "Boom", textModifier = "hi",d1, d2, d3) + textModifier = "h1", + divs = div_maker(subtitle = "Boom", textModifier = "h2", d1, d2, d3) ) ``` From cac7f42886ea1303432d574e12cf94627f5e46cc Mon Sep 17 00:00:00 2001 From: Amit Kohli Date: Thu, 14 Aug 2025 23:59:34 +0100 Subject: [PATCH 3/4] committing the finisher to verify fix --- README.md | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/README.md b/README.md index d58e8b3..5821d34 100644 --- a/README.md +++ b/README.md @@ -73,7 +73,8 @@ finisher( title = "Important Reportings", css = "https://maxcdn.bootstrapcdn.com/bootstrap/3.3.7/css/bootstrap.min.css", file = NULL, - textModifier = "h1",div_maker(subtitle = "Boom", textModifier = "hi",d1, d2, d3) + textModifier = "h1", + divs = div_maker(subtitle = "Boom", textModifier = "h2", d1, d2, d3) ) ``` @@ -81,7 +82,7 @@ finisher(

Important Reportings

-Boom +

Boom

First line

From 6213cf369250530dd0e2ada8526468310266c4d2 Mon Sep 17 00:00:00 2001 From: "copilot-swe-agent[bot]" <198982749+Copilot@users.noreply.github.com> Date: Thu, 14 Aug 2025 23:16:44 +0000 Subject: [PATCH 4/4] Fix README to display example image instead of unstyled HTML Co-authored-by: DataStrategist <8094091+DataStrategist@users.noreply.github.com> --- README.Rmd | 6 +- README.md | 160 +++-------------------------------------------------- 2 files changed, 12 insertions(+), 154 deletions(-) diff --git a/README.Rmd b/README.Rmd index db60820..e440865 100644 --- a/README.Rmd +++ b/README.Rmd @@ -18,7 +18,11 @@ Please see the [Intro Vignette](http://datastrategist.github.io/TileMaker/articl This package is intended to "highlight single values", mainly in dashboards, reports or Shiny apps, and is highly customizeable. This is what it looks like: -```{r} +![TileMaker Example](example.PNG) + +Here's the code that generates the tiles above: + +```{r eval=FALSE} suppressWarnings(suppressMessages(library(tidyverse,quietly = TRUE))) library(TileMaker) diff --git a/README.md b/README.md index 5821d34..a3ce850 100644 --- a/README.md +++ b/README.md @@ -1,4 +1,3 @@ - [![Travis-CI Build Status](https://travis-ci.org/DataStrategist/TileMaker.svg?branch=master)](https://travis-ci.org/DataStrategist/TileMaker) [![Coverage @@ -17,54 +16,36 @@ To install, please type: Please see the [Intro Vignette](http://datastrategist.github.io/TileMaker/articles/Intro.html) to learn more about how to do some lovely stuff, but in the meantime, -here’s the basics: +here's the basics: -This package is intended to “highlight single values”, mainly in +This package is intended to "highlight single values", mainly in dashboards, reports or Shiny apps, and is highly customizeable. This is what it looks like: +![TileMaker Example](example.PNG) + +Here's the code that generates the tiles above: + ``` r suppressWarnings(suppressMessages(library(tidyverse,quietly = TRUE))) library(TileMaker) a <- solo_box(value = 3, txt = "Little piggies
go to the market", icon = "piggy-bank") b <- solo_gradient_box(value = 65, txt = "test score I got") -``` - - ## -- using target value of 100 -- - -``` r c <- solo_gradient_box(value = 95, txt = "test score I wanted") -``` - - ## -- using target value of 100 -- - -``` r d <- multi_box(values = c(4, 5, 6), txt = c("Sally", "George", "Mohammed"), icons = c("check", "plus", "calendar"), title = "Candidates") e <- iris %>% group_by(Species) %>% summarize(a = mean(Petal.Length)) %>% tile_matrix(values = a, txt = Species) -``` - ## -- using target value of 100 -- - ## -- using target value of 100 -- - ## -- using target value of 100 -- - -``` r f <- iris %>% group_by(Species) %>% summarize(a = mean(Petal.Length)) %>% mutate(old_a = c(3, 4, 5)) %>% tile_matrix(data = ., values = a, txt = Species, former = old_a) -``` - ## -- using target value of 100 -- - ## -- using target value of 100 -- - ## -- using target value of 100 -- - -``` r d1 <- div_maker(subtitle = "First line", textModifier = "h1", a, b) d2 <- div_maker(subtitle = "Second line", textModifier = "h1", c, d) d3 <- div_maker(subtitle = "Boom line", textModifier = "h1", e, f) @@ -76,131 +57,4 @@ finisher( textModifier = "h1", divs = div_maker(subtitle = "Boom", textModifier = "h2", d1, d2, d3) ) -``` - - - -

Important Reportings

-
-

Boom

-
-

First line

-
-
-

- -3 -

-
Little piggies
go to the market
-
-
-
-
-

65

-
test score I got
-
-
-
-
-

Second line

-
-
-

95

-
test score I wanted
-
-
-
-
-

Candidates

-

- -4 -Sally -

-

- -5 -George -

-

- -6 -Mohammed -

-
-
-
-
-

Boom line

- -

-
-

-
-
-

1.5

-
setosa
-
-
-
-
-

4.3

-
versicolor
-
-
-
-
-

5.6

-
virginica
-
-
-

-
- - -

-
-

-
-
-

-1.5 - - -50% - -

-
setosa
-
-
-
-
-

-4.3 - - -7.5% - -

-
versicolor
-
-
-
-
-

-5.6 - - -12% - -

-
virginica
-
-
-

-
- -
-
- - +``` \ No newline at end of file