`Quality Indicator`= Quality.Indicators) %>% Rename(`Compliance Component` = Compliance.Component, Labs(linetype = "", color = "", shape = "", x = "Quality Indiators", y = "Scores", title = "Center Qi Indicators Scores - Fall 2019")+ Theme(legend.position = "bottom", strip.text = element_text(color = "black")) + Geom_hline(yintercept = 3, linetype = "dashed", color = "black") + Ggplot(aes(x = Qi, y = score, group = score_type, color = score_type))+ This GGPlot causes the dir.name error - if removed, then the HTML color error occurs Row_spec(0, background = "othergreen", bold = TRUE, align = "c")%>%Ĭollapse_rows(columns = 1, valign = "top") Mutate(score_type = ifelse(rowname %in% MS, "Monitor Score", "Self-Assessment Score"),ĬCcat = ifelse(rowname %in% CC_cat1, "cat1", "cat2"), Options(_packages = FALSE)ĭplyr::filter(CenterID = CID) #Replace wth CenterID placeholder for Center Level Reportĭplyr::select(Qi1:Qi17, Qi1_SA:Qi17_SA)%>% #> Qi4 Qi5_SA Qi5 Qi6_SA Qi6 Qi7_SA Qi7 Qi11_SA Qi11 Qi12_SA Qi12 Qi13_SA Qi13Ĭreated on by the reprex package (v0.3.0) Rmarkdown report, which was unable to be put into with the reprex package, so I just pasted it here. #> CenterID GrantID MonitorID Qi1_SA Qi1 Qi2_SA Qi2 Qi3_SA Qi3 Qi4_SA Any suggestions on how to improve this post are welcome! Also, side note, I know some of my code isn't the most succinct, I'm more of an analytic programmer in R. Its kind of difficult to do this in reprex, since there is a Rmarkdown file (which I could not reprex the full contents) and then the Rmarkdown Rendering Script that is used to render the different reports by center. The condition has length > 1 and only the first element will be usedĢ: Column Qi joining factor and character vector, coercing into character vectorĭata length is not a sub-multiple or multiple of the number of columns Ĥ: In if (!file_test("-d", dirname(name))) dir.create(dirname(name), :Įrror related to colors (where I used RGB):Įrror: pandoc document conversion failed with error 2ģ: In if (nzchar(file_ext)) paste(".", file_ext, sep = "") else "" : Quitting from lines 222-233 (Grantee_Report.Rmd)Įrror in dir.create(dirname(name), recursive = TRUE) :ġ: In if (!grepl("html$", output_file)) knitr::opts_chunk$set(fig.retina = NULL) : Below is the error message and I can provide more, I just need to edit it for the client anonymity (state education based). My client requested particular colors which made this whole not so well paid experience difficult. My main issues are around using ggplot2 and xcolor colors using rgb. I am new to this, and this venue, and apologize if I can't search or understand previous posts. I created a reproducible report and it won't reproduce.
0 kommentar(er)
