我使用以下脚本制作下图
hypttauplot <- qplot(fuclin_csf, fitHYPTTAU, data=selTAU, geom=c("smooth"),
method="glm", color='black', linetype=BL_HYPT) +
theme_classic() + xlab("Time (years)") + ylab("Tau (pg/ml)") +
scale_x_continuous(expand=c(0,0)) +
ggtitle("A. Hypertension") +
theme(legend.position = "none")
Run Code Online (Sandbox Code Playgroud)
但现在我的问题是:为什么线条是红色而不是黑色?我怎样才能将它们变成黑色?
我有一个关于R.的问题.我想我忘了保存我正在处理的一个脚本而且我试图以某种方式将其恢复.该脚本涉及创建绘图的命令.
如果我使用命令:
print(nameoftheplot)
Run Code Online (Sandbox Code Playgroud)
我能够打印情节.这是否意味着R仍然在工作记忆中的某个地方有脚本?我该怎么办呢?
谢谢你的帮助!