我有以下一段代码,我正在编写这些代码,以便在论文中为我的文章生成黑白图像。
require(ggplot2)
require(extrafont)
#loadfonts(device="pdf")
#set the x-axis now
xaxis <- seq(0,1, by=0.01)
#set the functions here
aij <- sqrt(1 - (1-xaxis)**1.02)
bij <- 1 - (1 - xaxis)**1.50
#plot using commands
ggplot(,aes(xaxis)) + geom_line(aes(y=aij, colour="aij")) +
geom_line(aes(y=bij,colour="bij"),linetype="dashed") +
theme_bw() +
xlab("x ratio") +
ylab("Function values") +
theme(text=element_text(family="Times New Roman", face="bold", size=12))
ggsave('myGraph.pdf')
顺便提一下,我注意到以下几点:
(1)传奇标题需要消失 (2)数字需要是黑白两色 (3)我需要一条曲线在连续线(aij),另一条曲线在虚线形式(bij)。
上述代码需要添加什么?
答案 0 :(得分:3)
(1)
theme(legend.title = element_blank())
(2)
scale_colour_manual(values = rep("black", 2))
(3)
scale_linetype_manual(values = c("solid", "dashed"))
总之,例如:
ggplot(transform(stack(data.frame(aij, bij)), x = xaxis),
aes(x = x, y = values, linetype = ind)) +
geom_line() +
theme_bw() +
xlab("x ratio") +
ylab("Function values") +
theme(text=element_text(family="Times New Roman", face="bold", size=12),
legend.title = element_blank()) +
scale_linetype_manual(values = c("solid", "dashed"))
给出了