| #' Gauge Chart Oberserver Function | |
| #' | |
| #' Apply's on.click functionality to change tab when a gauge chart is clicked | |
| #' | |
| #' @param gauge_id id of gauge chart | |
| #' @param tab_to_select tab to move to | |
| #' @param tab_id equals histogram_tab_box for all cases | |
| #' @param session shiny server session | |
| #' | |
| #' @return invisible - used for side effects |
| library(dplyr) | |
| df <- data.frame(id = c(1,1,1,2,2,2), value = c(1,NA,NA,NA,NA,777)) | |
| df %>% | |
| group_by(id) %>% | |
| mutate( | |
| value2 = first(value[!is.na(value)]) | |
| ) |
| # ------------------------------------------------------------------------ | |
| # | |
| # Title : Emailing with RDCOMClient Walkthrough Script | |
| # By : Jimmy Briggs <jimmy.briggs@oliverwyman.com> | |
| # Date : 2020-06-03 | |
| # | |
| # ------------------------------------------------------------------------ | |
| # install RDCOMClient package: |
| library(jsonlite) | |
| library(fontawesome) | |
| library(rlang) | |
| library(purrr) | |
| library(tidyverse) | |
| # https://kapeli.com/cheat_sheets/Font_Awesome.docset/Contents/Resources/Documents/index | |
| # https://github.com/rstudio/fontawesome/blob/master/R/fa.R | |
| url <- "https://raw.githubusercontent.com/FortAwesome/Font-Awesome/master/metadata/icons.json" |
A little info about your project and/ or overview that explains what the project is about.
A short description of the motivation behind the creation and maintenance of the project. This should explain why the project exists.
Build status of continus integration i.e. travis, appveyor etc. Ex. -
If a project has to have multiple git repos (e.g. Bitbucket and Github) then it's better that they remain in sync.
Usually this would involve pushing each branch to each repo in turn, but actually Git allows pushing to multiple repos in one go.
If in doubt about what git is doing when you run these commands, just
| Get-ItemProperty HKLM:\Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\* | Select-Object DisplayName, DisplayVersion, Publisher, InstallDate | Format-Table –AutoSize > C:\Users\jimbr\Documents\InstalledPrograms\InstalledPrograms.txt |
-- PRE-INSTALL --
| # UI ------------------------------------------------------------ | |
| #' import shiny | |
| #' import shinyjs | |
| collapsible_sidebar_ui <- function(width = 230){ | |
| tagList( | |
| inlineCSS(paste0(".main-header > .navbar {margin-left: ", width, "px !important}")), | |
| inlineCSS(paste0(".main-header .logo {width: ", width, "px !important}")) |
