ggolot2 画ROC曲线

2019-02-13 17:57:25 浏览数 (1)

为了进一步了解ggplot2的使用,利用ROC曲线进行说明学习。

代码语言:javascript复制
####获取画图数据(data.frame格式)#####
library(ggplot2)
library(ROCR) ##用于计算ROC
data(ROCR.simple) ###画图数据集
pred <- prediction(ROCR.simple$predictions, ROCR.simple$labels)  
perf <- performance(pred,"tpr","fpr") 
x <- unlist(perf@x.values)  ##提取x值
y <- unlist(perf@y.values)
plotdata <- data.frame(x,y) 
names(plotdata) <- c("x", "y")
#####画图###############
##先确定映射图层geom_path,labs层修改标题,scale_colour_gradient层修改图例(为何是这个看2.0),theme层精细修改标题。##  
g <- ggplot(plotdata)   
  geom_path(aes(x = x, y = y, colour = x), size=1)   
  labs(x = "False positive rate", y = "Ture positive rate", title ="ROC曲线")  
  scale_colour_gradient(name = 'False positive rate', low = 'blue', high = 'red')  
  theme(plot.title = element_text(face = 'bold',size=15))
g

附上原版ROCR包自带的图和ggplot2的图进行对比:

0 人点赞