astra-sites
domain was triggered too early. This is usually an indicator for some code in the plugin or theme running too early. Translations should be loaded at the init
action or later. Please see Debugging in WordPress for more information. (This message was added in version 6.7.0.) in /home/statplace/public_html/site/wp-includes/functions.php on line 6114jetpack
domain was triggered too early. This is usually an indicator for some code in the plugin or theme running too early. Translations should be loaded at the init
action or later. Please see Debugging in WordPress for more information. (This message was added in version 6.7.0.) in /home/statplace/public_html/site/wp-includes/functions.php on line 6114wpforms-lite
domain was triggered too early. This is usually an indicator for some code in the plugin or theme running too early. Translations should be loaded at the init
action or later. Please see Debugging in WordPress for more information. (This message was added in version 6.7.0.) in /home/statplace/public_html/site/wp-includes/functions.php on line 6114wordpress-seo
domain was triggered too early. This is usually an indicator for some code in the plugin or theme running too early. Translations should be loaded at the init
action or later. Please see Debugging in WordPress for more information. (This message was added in version 6.7.0.) in /home/statplace/public_html/site/wp-includes/functions.php on line 6114astra
foi ativado muito cedo. Isso geralmente é um indicador de que algum código no plugin ou tema está sendo executado muito cedo. As traduções devem ser carregadas na ação init
ou mais tarde. Leia como Depurar o WordPress para mais informações. (Esta mensagem foi adicionada na versão 6.7.0.) in /home/statplace/public_html/site/wp-includes/functions.php on line 6114Artigo feito em colabora\u00e7\u00e3o com Beth\u00e2nia Kelly<\/em><\/p>\n\n\n\n O pacote Bs4Dash \u00e9 uma extens\u00e3o do Shiny<\/strong> que permite criar dashboards modernos e responsivos utilizando o Bootstrap 4 e o AdminLTE3. O Shiny, amplamente utilizado para desenvolver aplica\u00e7\u00f5es web interativas no R, frequentemente emprega o shinydashboard, que \u00e9 baseado no Bootstrap 3. O Bs4Dash foi desenvolvido para aproveitar as funcionalidades e o design mais moderno do Bootstrap 4, permitindo uma transi\u00e7\u00e3o suave para quem j\u00e1 est\u00e1 acostumado com o shinydashboard, pois sua sintaxe \u00e9 bastante similar\u200b (David Granjon<\/a>)\u200b.<\/p>\n\n\n\n Existem v\u00e1rios benef\u00edcios em utilizar o Bs4Dash, sendo um dos principais a possibilidade de criar dashboards com um design mais atualizado e recursos mais avan\u00e7ados<\/strong>, comparado ao Bootstrap 3. Al\u00e9m disso, o Bs4Dash oferece maior flexibilidade e customiza\u00e7\u00e3o, permitindo que os usu\u00e1rios ajustem seus dashboards para atender \u00e0s necessidades espec\u00edficas de seus projetos, tudo isso sem perder a simplicidade na migra\u00e7\u00e3o de c\u00f3digos que j\u00e1 utilizam o shinydashboard\u200b.<\/p>\n\n\n\n Instala\u00e7\u00e3o e Configura\u00e7\u00e3o<\/strong><\/p>\n\n\n\n Para instalar o pacote Bs4Dash, voc\u00ea dever\u00e1 usar o CRAN. Abaixo est\u00e3o os comandos necess\u00e1rios para instala\u00e7\u00e3o e carregamento do pacote:<\/p>\n\n\n\n Componentes e Layouts<\/strong><\/p>\n\n\n\n Definindo a Interface do Usu\u00e1rio (UI)<\/strong>: O c\u00f3digo come\u00e7a definindo a interface do usu\u00e1rio (UI), que \u00e9 a parte vis\u00edvel do aplicativo e onde todos os componentes visuais do dashboard s\u00e3o montados. No Bs4Dash, essa interface \u00e9 criada com a fun\u00e7\u00e3o bs4DashPage(), que organiza os principais elementos do layout, como a barra de navega\u00e7\u00e3o (navbar), a barra lateral (sidebar), o corpo do conte\u00fado (body), a barra de controle (controlbar), e o rodap\u00e9 (footer).<\/p>\n\n\n\n Barra de Navega\u00e7\u00e3o (Navbar): <\/strong>A navbar \u00e9 a barra superior do dashboard e serve para exibir um t\u00edtulo ou outros elementos de navega\u00e7\u00e3o. No exemplo, o t\u00edtulo “Bs4Dash Example” \u00e9 exibido na barra superior, mas voc\u00ea pode personaliz\u00e1-la com bot\u00f5es, menus suspensos, e \u00edcones conforme necess\u00e1rio.<\/p>\n\n\n\n Barra Lateral (Sidebar)<\/strong>: A sidebar funciona como um menu de navega\u00e7\u00e3o lateral onde os usu\u00e1rios podem escolher diferentes se\u00e7\u00f5es ou abas do dashboard. No exemplo, dois itens de menu s\u00e3o criados: “Home” e “Settings”. Cada item \u00e9 associado a uma aba espec\u00edfica no corpo do dashboard, permitindo que os usu\u00e1rios alternem entre essas abas.<\/p>\n\n\n\n Body<\/strong>: O body \u00e9 a \u00e1rea principal onde o conte\u00fado do dashboard \u00e9 exibido. No exemplo, a estrutura \u00e9 definida usando bs4TabItems() para organizar as diferentes abas que o usu\u00e1rio pode acessar. Cada aba, como “Home” e “Settings”, \u00e9 definida por um bs4TabItem() e pode conter qualquer conte\u00fado que voc\u00ea deseja exibir, como gr\u00e1ficos, tabelas, ou texto.<\/p>\n\n\n\n Controlbar: <\/strong>A controlbar \u00e9 uma barra lateral adicional que pode ser usada para exibir controles extras, como sliders, bot\u00f5es, ou configura\u00e7\u00f5es. No exemplo, a barra de controle cont\u00e9m um bs4Card() com um sliderInput() que permite ao usu\u00e1rio ajustar valores interativamente.<\/p>\n\n\n\n Rodap\u00e9 (Footer)<\/strong>: O footer \u00e9 a se\u00e7\u00e3o na parte inferior do dashboard onde voc\u00ea pode adicionar informa\u00e7\u00f5es adicionais, como direitos autorais ou links para pol\u00edticas de privacidade. No exemplo, o rodap\u00e9 exibe textos personalizados \u00e0 esquerda e \u00e0 direita, oferecendo uma maneira discreta de incluir informa\u00e7\u00f5es importantes.<\/p>\n\n\n\n Server<\/strong>: Por fim, o server \u00e9 onde a l\u00f3gica de backend do aplicativo \u00e9 implementada. Embora o exemplo fornecido n\u00e3o inclua nenhuma l\u00f3gica complexa, este \u00e9 o local onde voc\u00ea definiria rea\u00e7\u00f5es a intera\u00e7\u00f5es do usu\u00e1rio, como a gera\u00e7\u00e3o de gr\u00e1ficos ou a manipula\u00e7\u00e3o de dados com base nos inputs fornecidos na UI.<\/p>\n\n\n\n Interatividade com <\/strong>Bs4Dash<\/strong><\/p>\n\n\n\n O Bs4Dash oferece uma ampla variedade de widgets interativos, como sliders, inputs de texto, seletores de data, e gr\u00e1ficos din\u00e2micos, que podem ser facilmente incorporados em dashboards. Estes widgets s\u00e3o altamente customiz\u00e1veis e permitem que os usu\u00e1rios interajam diretamente com os dados apresentados. Por exemplo, voc\u00ea pode adicionar um sliderInput para filtrar dados num\u00e9ricos em gr\u00e1ficos ou tabelas, ou usar actionButtons para permitir que os usu\u00e1rios realizem a\u00e7\u00f5es espec\u00edficas, como atualizar gr\u00e1ficos ou aplicar filtros adicionais. Al\u00e9m disso, os gr\u00e1ficos din\u00e2micos podem ser atualizados em tempo real com base nas intera\u00e7\u00f5es do usu\u00e1rio, o que melhora a experi\u00eancia e a usabilidade do dashboard\u200b.<\/p>\n\n\n\n Este exemplo mostra como criar um dashboard simples com widgets interativos como sliders e bot\u00f5es:<\/p>\n\n\n\n Uma das grandes vantagens do Bs4Dash \u00e9 sua capacidade de integra\u00e7\u00e3o com outros pacotes populares do R, como plotly, DT, e leaflet, que s\u00e3o essenciais para criar visualiza\u00e7\u00f5es interativas avan\u00e7adas.<\/p>\n\n\n\n Aqui, usamos plotly<\/strong> para criar gr\u00e1ficos interativos dentro de um dashboard Bs4Dash:<\/p>\n\n\n\n Estilos e Temas Personalizados<\/strong><\/p>\n\n\n\n Para personalizar o tema do seu dashboard, voc\u00ea pode ajustar aspectos como cores, fontes e outras propriedades CSS diretamente dentro do Bs4Dash<\/strong>. Isso \u00e9 feito atrav\u00e9s dos par\u00e2metros dispon\u00edveis na fun\u00e7\u00e3o dashboardPage, dashboardHeader, dashboardSidebar, e dashboardBody.<\/p>\n\n\n\n Aqui est\u00e1 um exemplo de como personalizar as cores e fontes:<\/p>\n\n\n\n Neste c\u00f3digo, utilizamos o pacote fresh para criar um tema personalizado que altera as cores da barra de navega\u00e7\u00e3o, fundo da sidebar, e fundo principal do dashboard. Voc\u00ea pode adaptar as cores e fontes para se adequar \u00e0 identidade visual desejada.<\/p>\n\n\n\n Voc\u00ea tamb\u00e9m pode usar a fun\u00e7\u00e3o icon() para adicionar \u00edcones do FontAwesome<\/strong> ao seu dashboard. Essas personaliza\u00e7\u00f5es tornam o dashboard mais din\u00e2mico e envolvente, melhorando tanto a est\u00e9tica quanto a experi\u00eancia do usu\u00e1rio.<\/p>\n\n\n\n Conclus\u00e3o<\/strong><\/p>\n\n\n\n Neste artigo, exploramos as diversas funcionalidades do Bs4Dash e como ele pode ser utilizado para criar dashboards interativos e visualmente atraentes no R. Vimos como o pacote permite a personaliza\u00e7\u00e3o de temas<\/strong>, incluindo a modifica\u00e7\u00e3o de cores, fontes, e outros elementos visuais, o que \u00e9 essencial para alinhar o design do dashboard \u00e0 identidade visual da sua organiza\u00e7\u00e3o. Tamb\u00e9m discutimos a integra\u00e7\u00e3o com outros pacotes populares, como plotly, DT, e leaflet, que ampliam as capacidades do Bs4Dash, permitindo a cria\u00e7\u00e3o de gr\u00e1ficos interativos, tabelas reativas, e mapas din\u00e2micos.<\/p>\n\n\n\n A capacidade de adicionar \u00edcones e anima\u00e7\u00f5es oferece uma camada extra de usabilidade e est\u00e9tica<\/strong>, tornando o dashboard n\u00e3o apenas funcional, mas tamb\u00e9m intuitivo e envolvente para o usu\u00e1rio final. Esses recursos combinados fazem do Bs4Dash uma ferramenta poderosa para profissionais de dados, desenvolvedores e qualquer pessoa interessada em criar dashboards eficazes e personalizados.<\/p>\n\n\n\n https:\/\/divadnojnarg.github.io\/post\/bs4dash<\/a><\/p>\n\n\n\n https:\/\/shinydevseries.com\/interview\/ep004<\/a><\/p>\n\n\n\n https:\/\/github.com\/RinteRface\/bs4Dash<\/a><\/p>\n\n\n\n https:\/\/rinterface.github.io\/bs4Dash<\/a><\/p>\n\n\n\n https:\/\/github.com\/RinteRface\/bs4Dash<\/a> https:\/\/github.com\/dreamRs\/fresh<\/a><\/p>\n<\/div><\/div>\n","protected":false},"excerpt":{"rendered":" Artigo feito em colabora\u00e7\u00e3o com Beth\u00e2nia Kelly O pacote Bs4Dash \u00e9 uma extens\u00e3o do Shiny que permite criar dashboards modernos e responsivos utilizando o Bootstrap 4 e o AdminLTE3. O Shiny, amplamente utilizado para desenvolver aplica\u00e7\u00f5es web interativas no R, frequentemente emprega o shinydashboard, que \u00e9 baseado no Bootstrap 3. O Bs4Dash foi desenvolvido para …<\/p>\n`install.packages(\"bs4Dash\")\n\n library(\"bs4Dash\")`<\/code><\/pre>\n\n\n\n
\n
library(shiny)\n\nlibrary(bs4Dash)\n\nui <- bs4DashPage(\n\nnavbar = bs4DashNavbar(\n\n title = \"Bs4Dash Example\"\n\n ),\n\n sidebar = bs4DashSidebar(\n\n skin = \"light\",\n\n status = \"warning\",\n\n title = \"Menu\",\n\n bs4SidebarMenu(\n\n bs4SidebarMenuItem(\"Home\", tabName = \"home\", icon = \"house\"),\n\n bs4SidebarMenuItem(\"Settings\", tabName = \"settings\", icon = \"gears\")\n\n )\n\n ),\n\n body = bs4DashBody(\n\n bs4TabItems(\n\n bs4TabItem(\n\n tabName = \"home\",\n\n fluidRow(\n\n bs4Box(\n\n title = \"Welcome\",\n\n width = 12,\n\n \"This is the home tab content.\"\n\n )\n\n )\n\n ),\n\n bs4TabItem(\n\n tabName = \"settings\",\n\n fluidRow(\n\n bs4Box(\n\n title = \"Settings\",\n\n width = 12,\n\n \"This is the settings tab content.\"\n\n )\n\n )\n\n )\n\n )\n\n ),\n\n controlbar = bs4DashControlbar(\n\n skin = \"dark\",\n\n title = \"Extra Controls\",\n\n bs4Card(\n\n title = \"Card Title\",\n\n width = 12,\n\n sliderInput(\"slider1\", \"Select Value:\", 1, 100, 50)\n\n )\n\n ),\n\n footer = bs4DashFooter(\n\n left_text = \"Custom footer text\",\n\n right_text = \"2024 \u00a9 Your Company\"\n\n )\n\n)\n\nserver <- function(input, output) {\n\n # Server logic (if any) goes here\n\n}\n\nshinyApp(ui, server)<\/code><\/pre>\n\n\n\n
`library(shiny)\n\nlibrary(bs4Dash)\n\nui <- dashboardPage(\n\n header = dashboardHeader(title = \"Exemplo Bs4Dash\"),\n\n sidebar = dashboardSidebar(),\n\n body = dashboardBody(\n\n fluidRow(\n\n box(\n\n title = \"Interatividade com Sliders\",\n\n width = 6,\n\n sliderInput(\"obs\", \"N\u00famero de Observa\u00e7\u00f5es:\", min = 1, max = 1000, value = 500),\n\n actionButton(\"update\", \"Atualizar Gr\u00e1fico\")\n\n ),\n\n box(\n\n title = \"Gr\u00e1fico Din\u00e2mico\",\n\n width = 6,\n\n plotOutput(\"distPlot\")\n\n )\n\n )\n\n )\n\n)\n\nserver <- function(input, output) {\n\n observeEvent(input$update, {\n\n output$distPlot <- renderPlot({\n\n hist(rnorm(input$obs))\n\n })\n\n })\n\n}\n\nshinyApp(ui, server)`<\/code><\/pre>\n\n\n\n
`library(shiny)\n\nlibrary(bs4Dash)\n\nlibrary(plotly)\n\nui <- dashboardPage(\n\n header = dashboardHeader(title = \"Integra\u00e7\u00e3o com Plotly\"),\n\n sidebar = dashboardSidebar(),\n\n body = dashboardBody(\n\n fluidRow(\n\n box(\n\n title = \"Gr\u00e1fico Interativo com Plotly\",\n\n width = 12,\n\n plotlyOutput(\"plotlyGraph\")\n\n )\n\n )\n\n )\n\n)\n\nserver <- function(input, output) {\n\n output$plotlyGraph <- renderPlotly({\n\n plot_ly(data = mtcars, x = ~mpg, y = ~wt, type = \"scatter\", mode = \"markers\")\n\n })\n\n}\n\nshinyApp(ui, server)`<\/code><\/pre>\n\n\n\n
library(shiny)\n\nlibrary(bs4Dash)\n\nui <- dashboardPage(\n\n freshTheme = create_theme(\n\n bs4dash_vars(\n\n navbar_light_color = \"#000000\",\n\n navbar_light_active_color = \"#FF5733\",\n\n sidebar_light_bg = \"#F4F6F9\"\n\n ),\n\n bs4dash_yiq(\n\n contrasted_threshold = 50,\n\n text_dark = \"#000000\",\n\n text_light = \"#FFFFFF\"\n\n ),\n\n bs4dash_layout(main_bg = \"#E3F2FD\")\n\n ),\n\n header = dashboardHeader(title = \"Dashboard Personalizado\"),\n\n sidebar = dashboardSidebar(),\n\n body = dashboardBody(\n\n fluidRow(\n\n box(\n\n title = \"Exemplo de Personaliza\u00e7\u00e3o\",\n\n width = 12,\n\n \"Este \u00e9 um exemplo de como alterar cores e fontes.\"\n\n )\n\n )\n\n )\n\n)\n\nserver <- function(input, output) {}\n\nshinyApp(ui, server)<\/code><\/pre>\n\n\n\n
library(shiny)\n\nlibrary(bs4Dash)\n\nui <- dashboardPage(\n\n header = dashboardHeader(title = tagList(icon(\"dashboard\"), \"Dashboard com \u00cdcones\")),\n\n sidebar = dashboardSidebar(\n\n menuItem(\"Home\", tabName = \"home\", icon = icon(\"home\")),\n\n menuItem(\"Gr\u00e1ficos\", tabName = \"charts\", icon = icon(\"chart-bar\"))\n\n ),\n\n body = dashboardBody(\n\n fluidRow(\n\n box(\n\n title = tagList(icon(\"cogs\"), \"Configura\u00e7\u00f5es\"),\n\n width = 12,\n\n \"Aqui voc\u00ea pode configurar seu dashboard.\"\n\n )\n\n )\n\n )\n\n)\n\nserver <- function(input, output) {}\n\nshinyApp(ui, server)<\/code><\/pre>\n\n\n\n
Refer\u00eancias bibliogr\u00e1ficas:<\/strong><\/h3>\n\n\n\n