mobileCharts
The goal of mobileCharts is to bring mobile friendly charts to shinyMobile via f2.
Installation
install.packages("remotes")
remotes::install_github("rinterface/mobileCharts")Example
See the website for more examples. Visit the demo (from your mobile) to have a better idea of the look and feel.
library(mobileCharts)
mobile(iris, aes(Sepal.Length, Sepal.Width, color = Species)) %>%
mobile_point()shinyMobile
refresh if you resize the screen
library(shiny)
library(shinyMobile)
library(mobileCharts)
ui <- f7Page(
title = "mobileCharts",
f7SingleLayout(
navbar = f7Navbar(
title = "mobileCharts",
hairline = TRUE,
shadow = TRUE
),
f7Shadow(
intensity = 16,
f7Card(
title = "Chart",
mobileOutput("mc", width = 400)
)
)
)
)
server <- function(input, output){
output$mc <- render_mobile({
mobile(iris, aes(Sepal.Length, Sepal.Width, color = Species)) %>%
mobile_point()
})
}
shinyApp(ui, server)