Когда Вы хотите сделать строку из выражения, лучший пример для этого assert
(#x
повороты значение x
к строке).
#define ASSERT_THROW(condition) \
if (!(condition)) \
throw std::exception(#condition " is false");
Чтобы сделать это с помощью обычной команды построения графика, я обычно создавал один график, а затем добавлял другие строки с помощью функции lines ()
.
В противном случае вы можете использовать решетка или ggplot2. Вот некоторые данные:
df <- data.frame(a = runif(10), b = runif(10), c = runif(10), x = 1:10)
Вы можете использовать xyplot ()
из решетки:
library(lattice)
xyplot(a + b + c ~ x, data = df, type = "l", auto.key=TRUE)
Или geom_line ()
в ggplot2:
library(ggplot2)
ggplot(melt(df, id.vars="x"), aes(x, value, colour = variable,
group = variable)) + geom_line() + theme_bw()
Вот еще один пример, включающий точки в каждой паре ( из этот пост в блоге обучающегося ):
library(lattice)
dotplot(VADeaths, type = "o", auto.key = list(lines = TRUE,
space = "right"), main = "Death Rates in Virginia - 1940",
xlab = "Rate (per 1000)")
И тот же график с использованием ggplot2:
library(ggplot2)
p <- ggplot(melt(VADeaths), aes(value, X1, colour = X2,
group = X2))
p + geom_point() + geom_line() + xlab("Rate (per 1000)") +
ylab("") + opts(title = "Death Rates in Virginia - 1940")