[inst/src/RunProcess.R:1:2:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L1) *style:* **Commented code should be removed.**
```r
#devtools::load_all("fhi")
 ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/src/RunProcess.R:3:7:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L3) *style:* **Put spaces around all infix operators.**
```r
  NAME="sykdomspuls_pdf",
     ~^~
```
[inst/src/RunProcess.R:4:6:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L4) *style:* **Put spaces around all infix operators.**
```r
  PKG="sykdomspulspdf",
    ~^~
```
[inst/src/RunProcess.R:5:14:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L5) *style:* **Put spaces around all infix operators.**
```r
  PACKAGE_DIR=".")
            ~^~
```
[inst/src/RunProcess.R:9:2:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L9) *style:* **Commented code should be removed.**
```r
#devtools::use_package("odfWeave")
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/src/RunProcess.R:12:54:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L12) *style:* **Commas should always have a space after.**
```r
files <- list.files(fhi::DashboardFolder("data_raw"),"^partially_formatted_")
                                                     ^
```
[inst/src/RunProcess.R:15:3:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L15) *style:* **Commented code should be removed.**
```r
# fhi::DashboardIsDev()
  ^~~~~~~~~~~~~~~~~~~~~
```
[inst/src/RunProcess.R:16:20:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L16) *warning:* **Do not use absolute paths.**
```r
fhi::DashboardMsg("/data_raw")
                   ^~~~~~~~~
```
[inst/src/RunProcess.R:17:13:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L17) *warning:* **Do not use absolute paths.**
```r
list.files("/data_raw")
            ^~~~~~~~~
```
[inst/src/RunProcess.R:19:20:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L19) *warning:* **Do not use absolute paths.**
```r
fhi::DashboardMsg("/data_raw/sykdomspuls_pdf")
                   ^~~~~~~~~
```
[inst/src/RunProcess.R:20:13:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L20) *warning:* **Do not use absolute paths.**
```r
list.files("/data_raw/sykdomspuls_pdf")
            ^~~~~~~~~
```
[inst/src/RunProcess.R:22:3:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L22) *style:* **Place a space before left parenthesis, except in a function call.**
```r
if(length(files)==0){
  ^
```
[inst/src/RunProcess.R:22:17:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L22) *style:* **Put spaces around all infix operators.**
```r
if(length(files)==0){
               ~^~~
```
[inst/src/RunProcess.R:24:12:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L24) *style:* **Put spaces around all infix operators.**
```r
  quit(save="no", status=0)
          ~^~
```
[inst/src/RunProcess.R:24:25:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L24) *style:* **Put spaces around all infix operators.**
```r
  quit(save="no", status=0)
                       ~^~
```
[inst/src/RunProcess.R:27:6:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L27) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  for(f in files) fhi::DashboardMsg(f)
     ^
```
[inst/src/RunProcess.R:31:5:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L31) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(file.exists(fhi::DashboardFolder("results","DONE.txt")) & !fhi::DashboardIsDev()){
    ^
```
[inst/src/RunProcess.R:31:49:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L31) *style:* **Commas should always have a space after.**
```r
  if(file.exists(fhi::DashboardFolder("results","DONE.txt")) & !fhi::DashboardIsDev()){
                                                ^
```
[inst/src/RunProcess.R:33:14:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L33) *style:* **Put spaces around all infix operators.**
```r
    quit(save="no", status=0)
            ~^~
```
[inst/src/RunProcess.R:33:27:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L33) *style:* **Put spaces around all infix operators.**
```r
    quit(save="no", status=0)
                         ~^~
```
[inst/src/RunProcess.R:36:46:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L36) *style:* **Commas should always have a space after.**
```r
  d <- fread(fhi::DashboardFolder("data_raw",useFile))
                                             ^
```
[inst/src/RunProcess.R:37:9:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L37) *style:* **Put spaces around all infix operators.**
```r
  fylke <-fread(system.file("extdata", "fylke.csv", package = "sykdomspulspdf"))
        ^~~
```
[inst/src/RunProcess.R:38:37:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L38) *style:* **Commas should always have a space after.**
```r
  lastestUpdate <- as.Date(gsub("_","-",LatestRawID()))
                                    ^
```
[inst/src/RunProcess.R:38:41:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L38) *style:* **Commas should always have a space after.**
```r
  lastestUpdate <- as.Date(gsub("_","-",LatestRawID()))
                                        ^
```
[inst/src/RunProcess.R:44:47:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L44) *style:* **Commas should always have a space after.**
```r
  alle <- tapply(data$gastro, data[, c("year","week")], sum)
                                              ^
```
[inst/src/RunProcess.R:45:11:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L45) *style:* **Put spaces around all infix operators.**
```r
  weeknow <-findLastWeek(lastestUpdate,alle) ### need to be fixed
          ^~~
```
[inst/src/RunProcess.R:45:40:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L45) *style:* **Commas should always have a space after.**
```r
  weeknow <-findLastWeek(lastestUpdate,alle) ### need to be fixed
                                       ^
```
[inst/src/RunProcess.R:46:25:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L46) *style:* **Commas should always have a space after.**
```r
  cat(paste("Last week",weeknow,sep = " "))
                        ^
```
[inst/src/RunProcess.R:46:33:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L46) *style:* **Commas should always have a space after.**
```r
  cat(paste("Last week",weeknow,sep = " "))
                                ^
```
[inst/src/RunProcess.R:50:66:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L50) *style:* **Commas should always have a space after.**
```r
    sykdompulspdf_template_copy(fhi::DashboardFolder("data_raw"),SYNDROM)
                                                                 ^
```
[inst/src/RunProcess.R:53:16:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L53) *style:* **Put spaces around all infix operators.**
```r
    if (SYNDROM=="mage") {
              ~^~~
```
[inst/src/RunProcess.R:54:10:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L54) *style:* **Use <-, not =, for assignment.**
```r
      add="magetarm"
         ^
```
[inst/src/RunProcess.R:54:10:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L54) *style:* **Put spaces around all infix operators.**
```r
      add="magetarm"
        ~^~
```
[inst/src/RunProcess.R:55:15:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L55) *style:* **Use <-, not =, for assignment.**
```r
      mytittle="Mage-tarminfeksjoner"
              ^
```
[inst/src/RunProcess.R:55:15:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L55) *style:* **Put spaces around all infix operators.**
```r
      mytittle="Mage-tarminfeksjoner"
             ~^~
```
[inst/src/RunProcess.R:57:23:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L57) *style:* **Put spaces around all infix operators.**
```r
    } else if (SYNDROM=="luft") {
                     ~^~~
```
[inst/src/RunProcess.R:58:10:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L58) *style:* **Use <-, not =, for assignment.**
```r
      add="luftvei"
         ^
```
[inst/src/RunProcess.R:58:10:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L58) *style:* **Put spaces around all infix operators.**
```r
      add="luftvei"
        ~^~
```
[inst/src/RunProcess.R:59:15:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L59) *style:* **Use <-, not =, for assignment.**
```r
      mytittle="Luftveisinfeksjoner"
              ^
```
[inst/src/RunProcess.R:59:15:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L59) *style:* **Put spaces around all infix operators.**
```r
      mytittle="Luftveisinfeksjoner"
             ~^~
```
[inst/src/RunProcess.R:67:16:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L67) *style:* **Use <-, not =, for assignment.**
```r
      Fylkename=f
               ^
```
[inst/src/RunProcess.R:67:16:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L67) *style:* **Put spaces around all infix operators.**
```r
      Fylkename=f
              ~^~
```
[inst/src/RunProcess.R:68:41:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L68) *style:* **Commas should always have a space after.**
```r
      data <- CleanDataByFylke(d, fylke,f)
                                        ^
```
[inst/src/RunProcess.R:69:38:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L69) *style:* **Commas should always have a space after.**
```r
      alle <- tapply(getdataout(data,SYNDROM), data[, c("year","week")], sum)
                                     ^
```
[inst/src/RunProcess.R:69:64:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L69) *style:* **Commas should always have a space after.**
```r
      alle <- tapply(getdataout(data,SYNDROM), data[, c("year","week")], sum)
                                                               ^
```
[inst/src/RunProcess.R:70:26:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L70) *style:* **Commas should always have a space after.**
```r
      yrange <- max(alle,na.rm=T)+(roundUpNice(max(alle,na.rm=T))*.20)
                         ^
```
[inst/src/RunProcess.R:70:31:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L70) *style:* **Put spaces around all infix operators.**
```r
      yrange <- max(alle,na.rm=T)+(roundUpNice(max(alle,na.rm=T))*.20)
                             ~^~
```
[inst/src/RunProcess.R:70:34:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L70) *style:* **Put spaces around all infix operators.**
```r
      yrange <- max(alle,na.rm=T)+(roundUpNice(max(alle,na.rm=T))*.20)
                                ~^~
```
[inst/src/RunProcess.R:70:35:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L70) *style:* **Place a space before left parenthesis, except in a function call.**
```r
      yrange <- max(alle,na.rm=T)+(roundUpNice(max(alle,na.rm=T))*.20)
                                  ^
```
[inst/src/RunProcess.R:70:57:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L70) *style:* **Commas should always have a space after.**
```r
      yrange <- max(alle,na.rm=T)+(roundUpNice(max(alle,na.rm=T))*.20)
                                                        ^
```
[inst/src/RunProcess.R:70:62:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L70) *style:* **Put spaces around all infix operators.**
```r
      yrange <- max(alle,na.rm=T)+(roundUpNice(max(alle,na.rm=T))*.20)
                                                            ~^~
```
[inst/src/RunProcess.R:70:66:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L70) *style:* **Put spaces around all infix operators.**
```r
      yrange <- max(alle,na.rm=T)+(roundUpNice(max(alle,na.rm=T))*.20)
                                                                ~^~
```
[inst/src/RunProcess.R:73:8:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L73) *style:* **Commented code should be removed.**
```r
      #fhi::RenderExternally()
       ^~~~~~~~~~~~~~~~~~~~~~~
```
[inst/src/RunProcess.R:74:65:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L74) *style:* **Commas should always have a space after.**
```r
      rmarkdown::render(input = fhi::DashboardFolder("data_raw",paste("monthly_report_",SYNDROM,".Rmd",sep="")),
                                                                ^
```
[inst/src/RunProcess.R:74:89:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L74) *style:* **Commas should always have a space after.**
```r
      rmarkdown::render(input = fhi::DashboardFolder("data_raw",paste("monthly_report_",SYNDROM,".Rmd",sep="")),
                                                                                ^
```
[inst/src/RunProcess.R:74:97:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L74) *style:* **Commas should always have a space after.**
```r
      rmarkdown::render(input = fhi::DashboardFolder("data_raw",paste("monthly_report_",SYNDROM,".Rmd",sep="")),
                                                                                ^
```
[inst/src/RunProcess.R:74:104:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L74) *style:* **Commas should always have a space after.**
```r
      rmarkdown::render(input = fhi::DashboardFolder("data_raw",paste("monthly_report_",SYNDROM,".Rmd",sep="")),
                                                                                ^
```
[inst/src/RunProcess.R:74:107:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L74) *style:* **Put spaces around all infix operators.**
```r
      rmarkdown::render(input = fhi::DashboardFolder("data_raw",paste("monthly_report_",SYNDROM,".Rmd",sep="")),
                                                                                ~^~
```
[inst/src/RunProcess.R:75:76:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L75) *style:* **Commas should always have a space after.**
```r
                        output_file = paste(gsub(" ", "", f, fixed = TRUE),"_",add,".pdf", sep=""),
                                                                           ^
```
[inst/src/RunProcess.R:75:80:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L75) *style:* **Commas should always have a space after.**
```r
                        output_file = paste(gsub(" ", "", f, fixed = TRUE),"_",add,".pdf", sep=""),
                                                                               ^
```
[inst/src/RunProcess.R:75:84:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L75) *style:* **Commas should always have a space after.**
```r
                        output_file = paste(gsub(" ", "", f, fixed = TRUE),"_",add,".pdf", sep=""),
                                                                                ^
```
[inst/src/RunProcess.R:75:95:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L75) *style:* **Put spaces around all infix operators.**
```r
                        output_file = paste(gsub(" ", "", f, fixed = TRUE),"_",add,".pdf", sep=""),
                                                                                ~^~
```
[inst/src/RunProcess.R:76:69:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L76) *style:* **Commas should always have a space after.**
```r
                        output_dir = fhi::DashboardFolder("results",paste("PDF",mydate,sep="_")))
                                                                    ^
```
[inst/src/RunProcess.R:76:81:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L76) *style:* **Commas should always have a space after.**
```r
                        output_dir = fhi::DashboardFolder("results",paste("PDF",mydate,sep="_")))
                                                                                ^
```
[inst/src/RunProcess.R:76:88:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L76) *style:* **Commas should always have a space after.**
```r
                        output_dir = fhi::DashboardFolder("results",paste("PDF",mydate,sep="_")))
                                                                                ^
```
[inst/src/RunProcess.R:76:91:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L76) *style:* **Put spaces around all infix operators.**
```r
                        output_dir = fhi::DashboardFolder("results",paste("PDF",mydate,sep="_")))
                                                                                ~^~
```
[inst/src/RunProcess.R:80:68:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L80) *style:* **Commas should always have a space after.**
```r
    sykdompulspdf_template_remove(fhi::DashboardFolder("data_raw"),SYNDROM)
                                                                   ^
```
[inst/src/RunProcess.R:88:44:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L88) *style:* **Commas should always have a space after.**
```r
file.create(fhi::DashboardFolder("results","DONE.txt"))
                                           ^
```
[inst/src/RunProcess.R:89:3:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L89) *style:* **Place a space before left parenthesis, except in a function call.**
```r
if(!fhi::DashboardIsDev()) quit(save="no", status=0)
  ^
```
[inst/src/RunProcess.R:89:37:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L89) *style:* **Put spaces around all infix operators.**
```r
if(!fhi::DashboardIsDev()) quit(save="no", status=0)
                                   ~^~
```
[inst/src/RunProcess.R:89:50:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L89) *style:* **Put spaces around all infix operators.**
```r
if(!fhi::DashboardIsDev()) quit(save="no", status=0)
                                                ~^~
```
[inst/src/RunProcess.R:90:1:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunProcess.R#L90) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[inst/src/RunTest.R:1:14:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/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_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/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_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/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_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/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_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/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_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/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_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/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_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/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_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/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_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/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_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/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_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L7) *style:* **Commas should always have a space after.**
```r
  files <- list.files(file.path(baseFolder,"sykdomspulspdf"))
                                           ^
```
[inst/src/RunTest.R:8:5:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/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_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/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_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/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,"sykdomspulspdf",f))
       ^
```
[inst/src/RunTest.R:9:49:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L9) *style:* **Commas should always have a space after.**
```r
    for(f in files) unlink(file.path(baseFolder,"sykdomspulspdf",f))
                                                ^
```
[inst/src/RunTest.R:9:66:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L9) *style:* **Commas should always have a space after.**
```r
    for(f in files) unlink(file.path(baseFolder,"sykdomspulspdf",f))
                                                                 ^
```
[inst/src/RunTest.R:13:19:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L13) *warning:* **Do not use absolute paths.**
```r
unlink(file.path("/junit","sykdomspulspdf.xml"))
                  ^~~~~~
```
[inst/src/RunTest.R:13:27:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L13) *style:* **Commas should always have a space after.**
```r
unlink(file.path("/junit","sykdomspulspdf.xml"))
                          ^
```
[inst/src/RunTest.R:18:26:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L18) *warning:* **Do not use absolute paths.**
```r
a$out <- file(file.path("/junit","sykdomspulspdf.xml"), "w+")
                         ^~~~~~
```
[inst/src/RunTest.R:18:34:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L18) *style:* **Commas should always have a space after.**
```r
a$out <- file(file.path("/junit","sykdomspulspdf.xml"), "w+")
                                 ^
```
[inst/src/RunTest.R:22:37:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L22) *style:* **Commas should always have a space after.**
```r
  output <- processx::run("Rscript","/r/sykdomspulspdf/src/RunProcess.R", error_on_status=F, echo=T)
                                    ^
```
[inst/src/RunTest.R:22:38:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L22) *warning:* **Do not use absolute paths.**
```r
  output <- processx::run("Rscript","/r/sykdomspulspdf/src/RunProcess.R", error_on_status=F, echo=T)
                                     ^~
```
[inst/src/RunTest.R:22:90:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L22) *style:* **Put spaces around all infix operators.**
```r
  output <- processx::run("Rscript","/r/sykdomspulspdf/src/RunProcess.R", error_on_status=F, echo=T)
                                                                                ~^~
```
[inst/src/RunTest.R:22:98:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L22) *style:* **Put spaces around all infix operators.**
```r
  output <- processx::run("Rscript","/r/sykdomspulspdf/src/RunProcess.R", error_on_status=F, echo=T)
                                                                                ~^~
```
[inst/src/RunTest.R:28:5:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L28) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(output$status==0){
    ^
```
[inst/src/RunTest.R:28:19:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L28) *style:* **Put spaces around all infix operators.**
```r
  if(output$status==0){
                 ~^~~
```
[inst/src/RunTest.R:29:35:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L29) *style:* **Commas should always have a space after.**
```r
    a$add_result("sykdomspulspdf","RunAll",testthat::expectation("success","Pass"))
                                  ^
```
[inst/src/RunTest.R:29:44:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L29) *style:* **Commas should always have a space after.**
```r
    a$add_result("sykdomspulspdf","RunAll",testthat::expectation("success","Pass"))
                                           ^
```
[inst/src/RunTest.R:29:76:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L29) *style:* **Commas should always have a space after.**
```r
    a$add_result("sykdomspulspdf","RunAll",testthat::expectation("success","Pass"))
                                                                           ^
```
[inst/src/RunTest.R:31:35:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L31) *style:* **Commas should always have a space after.**
```r
    a$add_result("sykdomspulspdf","RunAll",testthat::expectation("error","Fail"))
                                  ^
```
[inst/src/RunTest.R:31:44:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L31) *style:* **Commas should always have a space after.**
```r
    a$add_result("sykdomspulspdf","RunAll",testthat::expectation("error","Fail"))
                                           ^
```
[inst/src/RunTest.R:31:74:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L31) *style:* **Commas should always have a space after.**
```r
    a$add_result("sykdomspulspdf","RunAll",testthat::expectation("error","Fail"))
                                                                         ^
```
[inst/src/RunTest.R:34:33:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L34) *style:* **Commas should always have a space after.**
```r
  a$add_result("sykdomspulspdf","RunAll",testthat::expectation("success","Pass"))
                                ^
```
[inst/src/RunTest.R:34:42:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L34) *style:* **Commas should always have a space after.**
```r
  a$add_result("sykdomspulspdf","RunAll",testthat::expectation("success","Pass"))
                                         ^
```
[inst/src/RunTest.R:34:74:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L34) *style:* **Commas should always have a space after.**
```r
  a$add_result("sykdomspulspdf","RunAll",testthat::expectation("success","Pass"))
                                                                         ^
```
[inst/src/RunTest.R:40:1:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L40) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[inst/src/RunTest.R:41:1:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L41) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[inst/src/RunTest.R:42:1:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/inst/src/RunTest.R#L42) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/CreatePlots.R:53:1:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/R/CreatePlots.R#L53) *style:* **lines should not be more than 120 characters.**
```r
    inset = .02, roundUpNice(yrange), legend = c("2013 / 2014", "2014 / 2015", "2015 / 2016", "2016 / 2017", "2017 / 2018", "2018 / 2019"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/CreatePlots.R:60:5:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/R/CreatePlots.R#L60) *style:* **Commented code should be removed.**
```r
  # box("figure", col="blue")
    ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/CreatePlots.R:105:5:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/R/CreatePlots.R#L105) *style:* **Commented code should be removed.**
```r
  # box("figure", col="blue")
    ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/CreatePlots.R:106:5:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/R/CreatePlots.R#L106) *style:* **Commented code should be removed.**
```r
  # box("outer", lty="solid", col="green")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DataCleaning.R:154:5:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/R/DataCleaning.R#L154) *style:* **Commented code should be removed.**
```r
  # try(unlink(paste0("data_clean/done_",LatestRawID(),".txt")),TRUE)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DataCleaning.R:262:5:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/R/DataCleaning.R#L262) *style:* **Put spaces around all infix operators.**
```r
  10^floor(log10(x)) * nice[[which(x <= 10^floor(log10(x)) * nice)[[1]]]]
   ~^~
```
[R/DataCleaning.R:262:43:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/R/DataCleaning.R#L262) *style:* **Put spaces around all infix operators.**
```r
  10^floor(log10(x)) * nice[[which(x <= 10^floor(log10(x)) * nice)[[1]]]]
                                         ~^~
```
[R/DataCleaning.R:276:5:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/R/DataCleaning.R#L276) *style:* **Commented code should be removed.**
```r
  # d2<- tapply(d$consult, d[, c("year","week")], sum) ## get total consultations
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DataCleaning.R:277:5:](https://github.com/folkehelseinstituttet/dashboards_sykdomspulspdf/blob/d2ddf538c62a937fcf354ac70665547d7b52bda0/R/DataCleaning.R#L277) *style:* **Commented code should be removed.**
```r
  # if (type=="gastro") { return(d1)}
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


Aquest commit no és atòmic.
Cada funcionalitat s'ha d'implementar en un commit per separat.


`max_nr` is now an odd parameter name, this is actually the *start* number


sfsadf


These could probably be `wl_signal`s in an `events` struct.


Falta afegir la capçalera "insereix" en el .h no?
El commit no és complet!


How about call this `exec-path` or `executable-path`? There's a *lot* of fish-related paths, I think this would be more clear.


La capçalera hauria d'estar en el mateix commit que has afegit el codi del .c


this is actually just copied from the monolith file, comment and all:-)


Successfully aliased the URL <https://spacemuffin-qisdgkkzcp.now.sh> to the following alias.

* https://spacemuffin.now.sh


naming: suggest `symbol_table_buildert`, which would in future be a good place to put other useful widgets for symbol table users that are primarily inserting symbols.


Durch dieses > Auto fixes by translators.xiaomi.eu< werden ja sonst immer die Variablen-Strings ohne zusätzlichen übersetzten Text direkt gelöscht.