Commit 02733659 authored by Reinhold Kainhofer's avatar Reinhold Kainhofer

properly use colour and shape in ggplot so that one can later on add different...

properly use colour and shape in ggplot so that one can later on add different mortality tables / QxDataFrame without messing up the aesthetics
parent 790db8ba
...@@ -21,7 +21,7 @@ plotMortalityTables = function(data, ..., legend.title = "Sterbetafel", xlim=NUL ...@@ -21,7 +21,7 @@ plotMortalityTables = function(data, ..., legend.title = "Sterbetafel", xlim=NUL
if (missing(xlab)) xlab="Alter"; if (missing(xlab)) xlab="Alter";
if (missing(ylab)) ylab=expression(paste("Sterbewahrscheinlichkeit ", q[x])); if (missing(ylab)) ylab=expression(paste("Sterbewahrscheinlichkeit ", q[x]));
pl = ggplot(data, aes(x = x, y = y, colour = data$group)) + pl = ggplot(data, aes(x = x, y = y, colour = group, shape = group)) +
theme_bw() + theme_bw() +
theme( theme(
plot.title = element_text(size=18, face="bold"), plot.title = element_text(size=18, face="bold"),
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment