R2-22第五期雷达图

LIUUU 2017-12-05 10:20:21 阅读: 1037

任务一：

library(ggplot2)

library(ggradar)

library(fmsb)

mtcars

data1=mtcars[c(29:32),c(1:9)]

data1

radarchart(data1,axistype=1,seg=2,plty =1,plwd=2,maxmin = FALSE,title="R2-22")

legend("left",c("Ford Pantera L","Ferrari Dino","Maserati Bora","Volvo 142E"),col=c("black","red","green","blue"),bty="n",lty=0.6,pch=20)

任务二：

devtools::install_github("ricardo-bion/ggradar", dependencies=TRUE)

library(ggradar)

data=read.csv(file.choose())

data

ggradar(data,axis.label.size=4,grid.label.size = 6,legend.text.size = 8)+labs(title="R2-22")

邀请讨论

{{f.title}} 大小 {{f.file_size}} 下载 {{f.count_download}} 金币 {{f.count_gold}}

切换到完整评论

受邀请回答

{{f.title}} 大小 {{f.file_size}} 下载 {{f.count_download}} 金币 {{f.count_gold}}

切换到完整回复

发送回复

赞({{item.count_zan}})

踩({{item.count_cai}})

删除

回复关闭