[R] Reg: Help in assigning colors to factor variable in ggplot2

[John Kane]

I suspect you may be mixing *plot()* commands with *ggplot()* commands and
they are likely incompatible.

Could you supply some sample data and any error messages that you are
getting?   A handy way to supply some sample data is the dput() function.
In the case of a large dataset something like dput(head(mydata, 100))
should supply the data we need.

On Mon, 26 Dec 2022 at 09:06, Upananda Pani <upananda.pani using gmail.com> wrote:

> Dear All,
>
> I am trying to plot a scatter plot between  temperature and heart rate and
> additionally marking the outcome of the patients by colors. I am using the
> standard package Use the standard function plot as well as the functions of
> package "ggplot2" (Wickham (2009)). Save the plots in pdf files.
>
> I am geeting an error to plot when assigning colsOutcome to the
> scatterplot. I am doing it wrongly. Please advise me.
> ```{r}
> library(ggplot2)
> library(RColorBrewer)
> library(ggsci)
> ICUData <- read.csv(file = "ICUData.csv")
> ```
> ```{r}
> ## Generate empty vector
> colsOutcome <- character(nrow(ICUData))
> ## Fill with colors
> colsOutcome[ICUData$outcome == "died"] <- "#E41A1C"
> colsOutcome[ICUData$outcome == "home"] <- "#377EB8"
> colsOutcome[ICUData$outcome == "other hospital"] <- "#4DAF4A8"
> colsOutcome[ICUData$outcome == "secondary care/rehab"] <- "#984EA3"
> ```
>
> ```{r}
> plot(x = ICUData$temperature, y = ICUData$heart.rate, pch = 19,
>      xlab = "Maximum body temperature", ylab = "Maximum heart rate",
>      main = "500 ICU patients", col = colsOutcome, xlim = c(33,43))
> legend(x = "topleft", legend = c("died", "home", "other hospital",
> "secondary care/rehab"), pch = 19,
>        col = c("#E41A1C", "#377EB8", "#4DAF4A8", "#984EA3"))
> ```
> ______________________________________________
> R-help using r-project.org mailing list -- To UNSUBSCRIBE and more, see
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
> http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>


-- 
John Kane
Kingston ON Canada

	[[alternative HTML version deleted]]