The hardware and bandwidth for this mirror is donated by METANET, the Webhosting and Full Service-Cloud Provider.
If you wish to report a bug, or if you are interested in having us mirror your free-software or open-source project, please feel free to contact us at mirror[@]metanet.ch.
The GomoGomonoMi packages allows you to animate text in Rmd documents (xaringan slides included) and Shiny apps using the Animate.css library.
You can install the development version of GomoGomonoMi
from Github with:
install.packages("remotes")
remotes::install_github("feddelegrand7/GomoGomonoMi")Put the use_gomo() function at the beginning of your Rmd
document or Shiny application (at the UI):
library(GomoGomonoMi)
use_gomo()Then you can animate your text using the gomo_gomo_no()
function. Don’t hesitate to use help("gomo_gomo_no") to
check out additional arguments.
The Github README doesn’t allow for animation but it should work on your RMarkdown document or Shiny app.
gomo_gomo_no(text = "Straw hat", level = "#", animation = "bounce")Straw hat
For a listing of all the available animations provided by the Animate.css library, use the following function:
available_animations()
#> $attention_seekers
#> [1] "bounce" "flash" "pulse" "rubberBand" "shakeX"
#> [6] "shakeY" "headShake" "swing" "tada" "wobble"
#> [11] "jello" "heartBeat"
#>
#> $back_entrances
#> [1] "backInDown" "backInLeft" "backInRight" "backInUp"
#>
#> $back_exits
#> [1] "backOutDown" "backOutLeft" "backOutRight" "backOutUp"
#>
#> $bouncing_entrances
#> [1] "bounceIn" "bounceInDown" "bounceInLeft" "bounceInRight"
#> [5] "bounceInUp"
#>
#> $bouncing_exits
#> [1] "bounceOut" "bounceOutDown" "bounceOutLeft" "bounceOutRight"
#> [5] "bounceOutUp"
#>
#> $fading_entrances
#> [1] "fadeIn" "fadeInDown" "fadeInDownBig"
#> [4] "fadeInLeft" "fadeInLeftBig" "fadeInRight"
#> [7] "fadeInRightBig" "fadeInUp" "fadeInUpBig"
#> [10] "fadeInTopLeft" "fadeInTopRight" "fadeInBottomLeft"
#> [13] "fadeInBottomRight"
#>
#> $fading_exits
#> [1] "fadeOut" "fadeOutDown" "fadeOutDownBig"
#> [4] "fadeOutLeft" "fadeOutLeftBig" "fadeOutRight"
#> [7] "fadeOutRightBig" "fadeOutUp" "fadeOutUpBig"
#> [10] "fadeOutTopLeft" "fadeOutTopRight" "fadeOutBottomRight"
#> [13] "fadeOutBottomLeft"
#>
#> $flippers
#> [1] "flip" "flipInX" "flipInY" "flipOutX" "flipOutY"
#>
#> $lightspeed
#> [1] "lightSpeedInRight" "lightSpeedInLeft" "lightSpeedOutRight"
#> [4] "lightSpeedOutLeft"
#>
#> $rotating_entrances
#> [1] "rotateIn" "rotateInDownLeft" "rotateInDownRight"
#> [4] "rotateInUpLeft" "rotateInUpRight"
#>
#> $rotating_exits
#> [1] "rotateOut" "rotateOutDownLeft" "rotateOutDownRight"
#> [4] "rotateOutUpLeft" "rotateOutUpRight"
#>
#> $specials
#> [1] "hinge" "jackInTheBox" "rollIn" "rollOut"
#>
#> $zooming_entrances
#> [1] "zoomIn" "zoomInDown" "zoomInLeft" "zoomInRight" "zoomInUp"
#>
#> $zooming_exits
#> [1] "zoomOut" "zoomOutDown" "zoomOutLeft" "zoomOutRight" "zoomOutUp"
#>
#> $sliding_entrances
#> [1] "slideInDown" "slideInLeft" "slideInRight" "slideInUp"
#>
#> $sliding_exits
#> [1] "slideOutDown" "slideOutLeft" "slideOutRight" "slideOutUp"This is an example of a Shiny app that uses
GomoGomonoMi
library(shiny)
library(GomoGomonoMi)
ui <- fluidPage(use_gomo(),
gomo_gomo_no(text = "HELLO SHINY !!!!", level = "#", animation = "backInDown", duration = "slower")
)
server <- function(input, output) {
}
shinyApp(ui = ui, server = server)
Please note that the GomoGomonoMi project is released with a Contributor Code of Conduct. By contributing to this project, you agree to abide by its terms.
These binaries (installable software) and packages are in development.
They may not be fully stable and should be used with caution. We make no claims about them.