[inst/src/RunProcess.R:1:60:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L1) *style:* **Put spaces around all infix operators.**
```r
fhi::DashboardInitialiseOpinionated("noispiah", PACKAGE_DIR=".")
                                                          ~^~
```
[inst/src/RunProcess.R:12:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L12) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[inst/src/RunProcess.R:17:6:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L17) *style:* **Commented code should be removed.**
```r
    #list("stack"=stack[i],"data"=data[variable==stack$type[i] & location==stack$location[i] & age==stack$age[i]])
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/src/RunProcess.R:19:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L19) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[inst/src/RunProcess.R:20:23:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L20) *style:* **Put spaces around all infix operators.**
```r
  obj <- list(nextElem=nextEl)
                     ~^~
```
[inst/src/RunProcess.R:21:19:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L21) *style:* **Only use double-quotes.**
```r
  class(obj) <- c('abstractiter', 'iter')
                  ^~~~~~~~~~~~~~
```
[inst/src/RunProcess.R:21:35:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L21) *style:* **Only use double-quotes.**
```r
  class(obj) <- c('abstractiter', 'iter')
                                  ^~~~~~
```
[inst/src/RunProcess.R:27:22:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L27) *style:* **Put spaces around all infix operators.**
```r
stack <- GenStack(dev=fhi::DashboardIsDev(),
                    ~^~
```
[inst/src/RunProcess.R:28:41:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L28) *style:* **Put spaces around all infix operators.**
```r
                  FILES_RMD_USE_SYKEHJEM=CONFIG$FILES_RMD_USE_SYKEHJEM,
                                       ~^~
```
[inst/src/RunProcess.R:29:40:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L29) *style:* **Put spaces around all infix operators.**
```r
                  FILES_RMD_USE_SYKEHUS=CONFIG$FILES_RMD_USE_SYKEHUS)
                                      ~^~
```
[inst/src/RunProcess.R:31:37:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L31) *style:* **Put spaces around all infix operators.**
```r
pb <- RAWmisc::ProgressBarCreate(max=nrow(stack))
                                   ~^~
```
[inst/src/RunProcess.R:40:22:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L40) *style:* **Put spaces around all infix operators.**
```r
opts <- list(progress=ProgressFunction)
                    ~^~
```
[inst/src/RunProcess.R:49:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L49) *style:* **Place a space before left parenthesis, except in a function call.**
```r
if(fhi::DashboardIsDev()){
  ^
```
[inst/src/RunProcess.R:50:15:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L50) *style:* **Use <-, not =, for assignment.**
```r
  analysisIter=stack[1]
              ^
```
[inst/src/RunProcess.R:50:15:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L50) *style:* **Put spaces around all infix operators.**
```r
  analysisIter=stack[1]
             ~^~
```
[inst/src/RunProcess.R:51:51:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L51) *style:* **Commas should always have a space after.**
```r
  file.remove(file.path(analysisIter$outputDirUse,sprintf("%s.pdf",analysisIter$location)))
                                                  ^
```
[inst/src/RunProcess.R:51:68:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L51) *style:* **Commas should always have a space after.**
```r
  file.remove(file.path(analysisIter$outputDirUse,sprintf("%s.pdf",analysisIter$location)))
                                                                   ^
```
[inst/src/RunProcess.R:52:30:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L52) *style:* **Put spaces around all infix operators.**
```r
  fhi::RenderExternally(input=analysisIter$RMD,
                            ~^~
```
[inst/src/RunProcess.R:53:36:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L53) *style:* **Put spaces around all infix operators.**
```r
                        output_file=sprintf("%s.pdf",analysisIter$location),
                                  ~^~
```
[inst/src/RunProcess.R:53:54:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L53) *style:* **Commas should always have a space after.**
```r
                        output_file=sprintf("%s.pdf",analysisIter$location),
                                                     ^
```
[inst/src/RunProcess.R:54:35:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L54) *style:* **Put spaces around all infix operators.**
```r
                        output_dir=analysisIter$outputDirUse,
                                 ~^~
```
[inst/src/RunProcess.R:55:31:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L55) *style:* **Put spaces around all infix operators.**
```r
                        params=sprintf("dev=%s,level=\"%s\",location=\"%s\"",
                             ~^~
```
[inst/src/RunProcess.R:61:28:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L61) *style:* **Put spaces around all infix operators.**
```r
res <- foreach(analysisIter=StackIterator(stack, ProgressFunction)) %dopar% {
                          ~^~
```
[inst/src/RunProcess.R:63:30:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L63) *style:* **Put spaces around all infix operators.**
```r
  fhi::RenderExternally(input=analysisIter$RMD,
                            ~^~
```
[inst/src/RunProcess.R:64:36:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L64) *style:* **Put spaces around all infix operators.**
```r
                        output_file=sprintf("%s.pdf",analysisIter$location),
                                  ~^~
```
[inst/src/RunProcess.R:64:54:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L64) *style:* **Commas should always have a space after.**
```r
                        output_file=sprintf("%s.pdf",analysisIter$location),
                                                     ^
```
[inst/src/RunProcess.R:65:35:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L65) *style:* **Put spaces around all infix operators.**
```r
                        output_dir=analysisIter$outputDirUse,
                                 ~^~
```
[inst/src/RunProcess.R:66:31:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L66) *style:* **Put spaces around all infix operators.**
```r
                        params=sprintf("dev=%s,level=\"%s\",location=\"%s\"",
                             ~^~
```
[inst/src/RunProcess.R:74:40:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L74) *style:* **Commas should always have a space after.**
```r
file.create(DashboardFolder("data_raw","DONE.txt"))
                                       ^
```
[inst/src/RunProcess.R:77:10:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L77) *style:* **Put spaces around all infix operators.**
```r
quit(save="no")
        ~^~
```
[inst/src/RunProcess.R:80:2:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunProcess.R#L80) *style:* **Commented code should be removed.**
```r
#"Møre og Romsdal - Haram"
 ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/src/RunTest.R:1:14:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L1) *warning:* **Do not use absolute paths.**
```r
con <- file("/tmp/computer","r")
             ^~~~
```
[inst/src/RunTest.R:1:29:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L1) *style:* **Commas should always have a space after.**
```r
con <- file("/tmp/computer","r")
                            ^
```
[inst/src/RunTest.R:2:32:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L2) *style:* **Commas should always have a space after.**
```r
COMPUTER_NAME <- readLines(con,n=1)
                               ^
```
[inst/src/RunTest.R:2:33:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L2) *style:* **Put spaces around all infix operators.**
```r
COMPUTER_NAME <- readLines(con,n=1)
                               ~^~
```
[inst/src/RunTest.R:4:20:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L4) *style:* **Put spaces around all infix operators.**
```r
Sys.setenv(COMPUTER=COMPUTER_NAME)
                  ~^~
```
[inst/src/RunTest.R:6:4:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L6) *style:* **Place a space before left parenthesis, except in a function call.**
```r
for(baseFolder in c("/data_clean","/results","/data_app")){
   ^
```
[inst/src/RunTest.R:6:22:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L6) *warning:* **Do not use absolute paths.**
```r
for(baseFolder in c("/data_clean","/results","/data_app")){
                     ^~~~~~~~~~~
```
[inst/src/RunTest.R:6:35:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L6) *style:* **Commas should always have a space after.**
```r
for(baseFolder in c("/data_clean","/results","/data_app")){
                                  ^
```
[inst/src/RunTest.R:6:36:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L6) *warning:* **Do not use absolute paths.**
```r
for(baseFolder in c("/data_clean","/results","/data_app")){
                                   ^~~~~~~~
```
[inst/src/RunTest.R:6:46:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L6) *style:* **Commas should always have a space after.**
```r
for(baseFolder in c("/data_clean","/results","/data_app")){
                                             ^
```
[inst/src/RunTest.R:6:47:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L6) *warning:* **Do not use absolute paths.**
```r
for(baseFolder in c("/data_clean","/results","/data_app")){
                                              ^~~~~~~~~
```
[inst/src/RunTest.R:7:44:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L7) *style:* **Commas should always have a space after.**
```r
  files <- list.files(file.path(baseFolder,"noispiah"))
                                           ^
```
[inst/src/RunTest.R:8:5:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L8) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(length(files)>0){
    ^
```
[inst/src/RunTest.R:8:19:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L8) *style:* **Put spaces around all infix operators.**
```r
  if(length(files)>0){
                 ~^~
```
[inst/src/RunTest.R:9:8:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L9) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    for(f in files) unlink(file.path(baseFolder,"noispiah",f))
       ^
```
[inst/src/RunTest.R:9:49:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L9) *style:* **Commas should always have a space after.**
```r
    for(f in files) unlink(file.path(baseFolder,"noispiah",f))
                                                ^
```
[inst/src/RunTest.R:9:60:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L9) *style:* **Commas should always have a space after.**
```r
    for(f in files) unlink(file.path(baseFolder,"noispiah",f))
                                                           ^
```
[inst/src/RunTest.R:13:19:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L13) *warning:* **Do not use absolute paths.**
```r
unlink(file.path("/junit","noispiah.xml"))
                  ^~~~~~
```
[inst/src/RunTest.R:13:27:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L13) *style:* **Commas should always have a space after.**
```r
unlink(file.path("/junit","noispiah.xml"))
                          ^
```
[inst/src/RunTest.R:18:26:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L18) *warning:* **Do not use absolute paths.**
```r
a$out <- file(file.path("/junit","noispiah.xml"), "w+")
                         ^~~~~~
```
[inst/src/RunTest.R:18:34:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L18) *style:* **Commas should always have a space after.**
```r
a$out <- file(file.path("/junit","noispiah.xml"), "w+")
                                 ^
```
[inst/src/RunTest.R:21:35:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L21) *style:* **Commas should always have a space after.**
```r
output <- processx::run("Rscript","/r/noispiah/src/RunProcess.R", error_on_status=F, echo=T)
                                  ^
```
[inst/src/RunTest.R:21:36:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L21) *warning:* **Do not use absolute paths.**
```r
output <- processx::run("Rscript","/r/noispiah/src/RunProcess.R", error_on_status=F, echo=T)
                                   ^~
```
[inst/src/RunTest.R:21:82:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L21) *style:* **Put spaces around all infix operators.**
```r
output <- processx::run("Rscript","/r/noispiah/src/RunProcess.R", error_on_status=F, echo=T)
                                                                                ~^~
```
[inst/src/RunTest.R:21:90:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L21) *style:* **Put spaces around all infix operators.**
```r
output <- processx::run("Rscript","/r/noispiah/src/RunProcess.R", error_on_status=F, echo=T)
                                                                                ~^~
```
[inst/src/RunTest.R:27:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L27) *style:* **Place a space before left parenthesis, except in a function call.**
```r
if(output$status==0){
  ^
```
[inst/src/RunTest.R:27:17:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L27) *style:* **Put spaces around all infix operators.**
```r
if(output$status==0){
               ~^~~
```
[inst/src/RunTest.R:28:27:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L28) *style:* **Commas should always have a space after.**
```r
  a$add_result("noispiah","RunAll",testthat::expectation("success","Pass"))
                          ^
```
[inst/src/RunTest.R:28:36:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L28) *style:* **Commas should always have a space after.**
```r
  a$add_result("noispiah","RunAll",testthat::expectation("success","Pass"))
                                   ^
```
[inst/src/RunTest.R:28:68:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L28) *style:* **Commas should always have a space after.**
```r
  a$add_result("noispiah","RunAll",testthat::expectation("success","Pass"))
                                                                   ^
```
[inst/src/RunTest.R:30:27:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L30) *style:* **Commas should always have a space after.**
```r
  a$add_result("noispiah","RunAll",testthat::expectation("error","Fail"))
                          ^
```
[inst/src/RunTest.R:30:36:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L30) *style:* **Commas should always have a space after.**
```r
  a$add_result("noispiah","RunAll",testthat::expectation("error","Fail"))
                                   ^
```
[inst/src/RunTest.R:30:66:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L30) *style:* **Commas should always have a space after.**
```r
  a$add_result("noispiah","RunAll",testthat::expectation("error","Fail"))
                                                                 ^
```
[inst/src/RunTest.R:36:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L36) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[inst/src/RunTest.R:37:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L37) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[inst/src/RunTest.R:38:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/inst/src/RunTest.R#L38) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/CheckData.R:28:6:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/CheckData.R#L28) *style:* **Commented code should be removed.**
```r
  #  file.copy(system.file("extdata", f, package = "noispiah"),file.path(raw,"rapporter",f), overwrite = TRUE)
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/CheckData.R:35:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/CheckData.R#L35) *style:* **lines should not be more than 120 characters.**
```r
      file.copy(system.file("extdata", f, package = "noispiah"), file.path(raw, "rapporter", sprintf("%s_%s", lubridate::today(), f)), overwrite = TRUE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/CheckData.R:46:7:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/CheckData.R#L46) *style:* **Closing curly-braces should always be on their own line, unless it's followed by an else.**
```r
      }, {
      ^
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:8:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L8) *style:* **Variable and function names should not be longer than 30 characters.**
```r
Data_DeltagelseForekomstHAIogABiSykehjem <- function(di, da, level, DATE_USE) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:15:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L15) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallUrinveisInfeksjonerUtenUrinveiskateter_EgenInstitusjon <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:16:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L16) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallUrinveisInfeksjonerUtenUrinveiskateter_AnnetSykehus <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:17:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L17) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallUrinveisInfeksjonerUtenUrinveiskateter_AnnetSykehjem <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:18:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L18) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallUrinveisInfeksjonerMedUrinveiskateter_EgenInstitusjon <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:19:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L19) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallUrinveisInfeksjonerMedUrinveiskateter_AnnetSykehus <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:20:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L20) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallUrinveisInfeksjonerMedUrinveiskateter_AnnetSykehjem <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:21:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L21) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallNedreLuftveisInfeksjoner_EgenInstitusjon <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:22:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L22) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallNedreLuftveisInfeksjoner_AnnetSykehus <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:23:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L23) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallNedreLuftveisInfeksjoner_AnnetSykehjem <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:24:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L24) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallOverflatiskePostOpSarinfeksjoner_EgenInstitusjon <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:25:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L25) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallOverflatiskePostOpSarinfeksjoner_AnnetSykehus <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:26:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L26) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallOverflatiskePostOpSarinfeksjoner_AnnetSykehjem <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:27:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L27) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallDypePostOpSarinfeksjoner_EgenInstitusjon <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:28:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L28) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallDypePostOpSarinfeksjoner_AnnetSykehus <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:29:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L29) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallDypePostOpSarinfeksjoner_AnnetSykehjem <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:30:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L30) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallHudInfeksjoner_EgenInstitusjon <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:31:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L31) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallHudInfeksjoner_AnnetSykehus <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:32:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L32) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallHudInfeksjoner_AnnetSykehjem <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:61:34:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L61) *style:* **Variable and function names should not be longer than 30 characters.**
```r
      antallInfeksjonerHAI = sum(AntallUrinveisInfeksjonerUtenUrinveiskateter_EgenInstitusjon +
                                 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:62:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L62) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallUrinveisInfeksjonerUtenUrinveiskateter_AnnetSykehus +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:63:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L63) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallUrinveisInfeksjonerUtenUrinveiskateter_AnnetSykehjem +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:64:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L64) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallUrinveisInfeksjonerMedUrinveiskateter_EgenInstitusjon +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:65:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L65) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallUrinveisInfeksjonerMedUrinveiskateter_AnnetSykehus +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:66:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L66) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallUrinveisInfeksjonerMedUrinveiskateter_AnnetSykehjem +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:67:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L67) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallNedreLuftveisInfeksjoner_EgenInstitusjon +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:68:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L68) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallNedreLuftveisInfeksjoner_AnnetSykehus +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:69:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L69) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallNedreLuftveisInfeksjoner_AnnetSykehjem +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:70:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L70) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallOverflatiskePostOpSarinfeksjoner_EgenInstitusjon +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:71:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L71) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallOverflatiskePostOpSarinfeksjoner_AnnetSykehus +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:72:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L72) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallOverflatiskePostOpSarinfeksjoner_AnnetSykehjem +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:73:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L73) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallDypePostOpSarinfeksjoner_EgenInstitusjon +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:74:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L74) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallDypePostOpSarinfeksjoner_AnnetSykehus +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:75:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L75) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallDypePostOpSarinfeksjoner_AnnetSykehjem +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:76:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L76) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallHudInfeksjoner_EgenInstitusjon +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:77:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L77) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallHudInfeksjoner_AnnetSykehus +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:78:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L78) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallHudInfeksjoner_AnnetSykehjem)
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:144:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L144) *style:* **Variable and function names should not be longer than 30 characters.**
```r
Table_DeltagelseForekomstHAIogABiSykehjem <- function(di, da, level, DATE_USE) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DeltagelseForekomstHAIogABiSykehjem.R:145:10:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/DeltagelseForekomstHAIogABiSykehjem.R#L145) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  tab <- Data_DeltagelseForekomstHAIogABiSykehjem(di = di, da = da, level = level, DATE_USE = DATE_USE)
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:8:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L8) *style:* **Variable and function names should not be longer than 30 characters.**
```r
Data_ForekomstHAIiSykehjemPerAvdelingstype <- function(di, da, DATE_USE) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:15:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L15) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallUrinveisInfeksjonerUtenUrinveiskateter_EgenInstitusjon <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:16:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L16) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallUrinveisInfeksjonerUtenUrinveiskateter_AnnetSykehus <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:17:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L17) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallUrinveisInfeksjonerUtenUrinveiskateter_AnnetSykehjem <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:18:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L18) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallUrinveisInfeksjonerMedUrinveiskateter_EgenInstitusjon <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:19:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L19) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallUrinveisInfeksjonerMedUrinveiskateter_AnnetSykehus <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:20:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L20) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallUrinveisInfeksjonerMedUrinveiskateter_AnnetSykehjem <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:21:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L21) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallNedreLuftveisInfeksjoner_EgenInstitusjon <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:22:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L22) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallNedreLuftveisInfeksjoner_AnnetSykehus <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:23:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L23) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallNedreLuftveisInfeksjoner_AnnetSykehjem <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:24:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L24) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallOverflatiskePostOpSarinfeksjoner_EgenInstitusjon <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:25:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L25) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallOverflatiskePostOpSarinfeksjoner_AnnetSykehus <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:26:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L26) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallOverflatiskePostOpSarinfeksjoner_AnnetSykehjem <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:27:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L27) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallDypePostOpSarinfeksjoner_EgenInstitusjon <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:28:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L28) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallDypePostOpSarinfeksjoner_AnnetSykehus <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:29:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L29) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallDypePostOpSarinfeksjoner_AnnetSykehjem <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:30:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L30) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallHudInfeksjoner_EgenInstitusjon <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:31:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L31) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallHudInfeksjoner_AnnetSykehus <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:32:3:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L32) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  AntallHudInfeksjoner_AnnetSykehjem <- NULL
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:56:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L56) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallUrinveisInfeksjonerUtenUrinveiskateter_EgenInstitusjon +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:57:11:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L57) *style:* **Variable and function names should not be longer than 30 characters.**
```r
          AntallUrinveisInfeksjonerUtenUrinveiskateter_AnnetSykehus +
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:58:11:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L58) *style:* **Variable and function names should not be longer than 30 characters.**
```r
          AntallUrinveisInfeksjonerUtenUrinveiskateter_AnnetSykehjem +
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:59:11:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L59) *style:* **Variable and function names should not be longer than 30 characters.**
```r
          AntallUrinveisInfeksjonerMedUrinveiskateter_EgenInstitusjon +
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:60:11:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L60) *style:* **Variable and function names should not be longer than 30 characters.**
```r
          AntallUrinveisInfeksjonerMedUrinveiskateter_AnnetSykehus +
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:61:11:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L61) *style:* **Variable and function names should not be longer than 30 characters.**
```r
          AntallUrinveisInfeksjonerMedUrinveiskateter_AnnetSykehjem
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:64:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L64) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallNedreLuftveisInfeksjoner_EgenInstitusjon +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:65:11:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L65) *style:* **Variable and function names should not be longer than 30 characters.**
```r
          AntallNedreLuftveisInfeksjoner_AnnetSykehus +
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:66:11:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L66) *style:* **Variable and function names should not be longer than 30 characters.**
```r
          AntallNedreLuftveisInfeksjoner_AnnetSykehjem
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:69:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L69) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallOverflatiskePostOpSarinfeksjoner_EgenInstitusjon +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:70:11:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L70) *style:* **Variable and function names should not be longer than 30 characters.**
```r
          AntallOverflatiskePostOpSarinfeksjoner_AnnetSykehus +
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:71:11:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L71) *style:* **Variable and function names should not be longer than 30 characters.**
```r
          AntallOverflatiskePostOpSarinfeksjoner_AnnetSykehjem +
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:72:11:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L72) *style:* **Variable and function names should not be longer than 30 characters.**
```r
          AntallDypePostOpSarinfeksjoner_EgenInstitusjon +
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:73:11:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L73) *style:* **Variable and function names should not be longer than 30 characters.**
```r
          AntallDypePostOpSarinfeksjoner_AnnetSykehus +
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:74:11:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L74) *style:* **Variable and function names should not be longer than 30 characters.**
```r
          AntallDypePostOpSarinfeksjoner_AnnetSykehjem
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:77:9:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L77) *style:* **Variable and function names should not be longer than 30 characters.**
```r
        AntallHudInfeksjoner_EgenInstitusjon +
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:78:11:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L78) *style:* **Variable and function names should not be longer than 30 characters.**
```r
          AntallHudInfeksjoner_AnnetSykehus +
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:79:11:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L79) *style:* **Variable and function names should not be longer than 30 characters.**
```r
          AntallHudInfeksjoner_AnnetSykehjem
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:84:10:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L84) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
  tab <- melt.data.table(tab, id.vars = c("Avdelingstype", "AntallBeboereKl8"))
         ^~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:115:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L115) *style:* **Variable and function names should not be longer than 30 characters.**
```r
Figure_ForekomstHAIiSykehjemPerAvdelingstype <- function(di, da, DATE_USE) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForekomstHAIiSykehjemPerAvdelingstype.R:122:10:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForekomstHAIiSykehjemPerAvdelingstype.R#L122) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  tab <- Data_ForekomstHAIiSykehjemPerAvdelingstype(di = di, da = da, DATE_USE = DATE_USE)
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaPerIndikasjon.R:9:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaPerIndikasjon.R#L9) *style:* **Variable and function names should not be longer than 30 characters.**
```r
Data_ForskrivningerAvAntibiotikaPerIndikasjon <- function(di, da, DATE_USE) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaPerIndikasjon.R:12:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaPerIndikasjon.R#L12) *style:* **lines should not be more than 120 characters.**
```r
  ab <- readxl::read_excel(file.path(system.file("extdata", package = "noispiah"), "2018-08-30_Antibiotikagrupper.xlsx"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaPerIndikasjon.R:36:5:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaPerIndikasjon.R#L36) *style:* **Commented code should be removed.**
```r
  # xtabs(~temp$forebyggingVsBehandling)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaPerIndikasjon.R:41:5:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaPerIndikasjon.R#L41) *style:* **Commented code should be removed.**
```r
  # xtabs(~temp$AB)
    ^~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaPerIndikasjon.R:43:5:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaPerIndikasjon.R#L43) *style:* **Commented code should be removed.**
```r
  # xtabs(~temp$forebyggingVsBehandling+temp$AB)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaPerIndikasjon.R:45:5:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaPerIndikasjon.R#L45) *style:* **Commented code should be removed.**
```r
  # xtabs(~temp$category)
    ^~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaPerIndikasjon.R:75:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaPerIndikasjon.R#L75) *style:* **Variable and function names should not be longer than 30 characters.**
```r
Figure_ForskrivningerAvAntibiotikaPerIndikasjon <- function(di, da, DATE_USE, indikasjon = "Nedre urinveisinfeksjon") {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaPerIndikasjon.R:82:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaPerIndikasjon.R#L82) *style:* **lines should not be more than 120 characters.**
```r
  tab <- Data_ForskrivningerAvAntibiotikaPerIndikasjon(di = di, da = da, DATE_USE = DATE_USE)[IndikasjonCategory == indikasjon]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaPerIndikasjon.R:82:10:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaPerIndikasjon.R#L82) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  tab <- Data_ForskrivningerAvAntibiotikaPerIndikasjon(di = di, da = da, DATE_USE = DATE_USE)[IndikasjonCategory == indikasjon]
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaPerIndikasjon.R:99:5:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaPerIndikasjon.R#L99) *style:* **Commented code should be removed.**
```r
  # q <- q + labs(caption="\n\n\n\n\n\n")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R:9:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R#L9) *style:* **Variable and function names should not be longer than 30 characters.**
```r
Data_ForskrivningerAvAntibiotikaTilForebyggingOgBehandling <- function(di, da, DATE_USE) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R:12:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R#L12) *style:* **lines should not be more than 120 characters.**
```r
  ab <- readxl::read_excel(file.path(system.file("extdata", package = "noispiah"), "2018-08-30_Antibiotikagrupper.xlsx"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R:36:5:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R#L36) *style:* **Commented code should be removed.**
```r
  # xtabs(~temp$forebyggingVsBehandling)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R:41:5:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R#L41) *style:* **Commented code should be removed.**
```r
  # xtabs(~temp$AB)
    ^~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R:43:5:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R#L43) *style:* **Commented code should be removed.**
```r
  # xtabs(~temp$forebyggingVsBehandling+temp$AB)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R:45:5:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R#L45) *style:* **Commented code should be removed.**
```r
  # xtabs(~temp$category)
    ^~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R:73:1:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R#L73) *style:* **Variable and function names should not be longer than 30 characters.**
```r
Figure_ForskrivningerAvAntibiotikaTilForebyggingOgBehandling <- function(di, da, DATE_USE) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R:80:10:](https://github.com/folkehelseinstituttet/dashboards_noispiah/blob/6c74a720333fbf9790b87475c7526dae00804504/R/ForskrivningerAvAntibiotikaTilForebyggingOgBehandling.R#L80) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  tab <- Data_ForskrivningerAvAntibiotikaTilForebyggingOgBehandling(di = di, da = da, DATE_USE = DATE_USE)
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


Zo veeel br's neerzetten zou ik persoonlijk vermijden.


```
Self.service .
adminretrieve_correspondingcodes_all.travis
Send_workvia.agents
Even.parallels
```


Great stuff... I used the 'plugins_api()' function as this wraps all this up. But the result is the same.

The one thing I'd say about this is, if I understand your implementation correctly, this would mean that the outgoing HTTP request within `get_dot_org_latest_download()` would be executed on every WordPress page load.  This is the reason I threw in transient storage to mitigate that.

Thanks for taking this pull request under consideration! It'll be a great addition when it's ready :)