散点图求助

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

以“x axis”列数据为x轴，“y asis”列的数据为y轴，将“y axis”的数据分为4组，其中值在0<=y<=25之间为第一组，值在25<y<=50之间为第二组，值在50<y<=75之间为第三组，值在75<y<=100为第四组，要求4组散点使用不同的散点类型和颜色进行区分


data.xlsx (33.85 KB)

2020-12-18 20:57:45 上传

数据文件

求大神解答

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：散点图 ASI SIS

install.packages('readxl')
install.packages('ggplot2')

library(readxl)
library(ggplot2)


you<-read_xlsx(‘’\\data.xlsx')#读入文件路径
you$class<-ifelse(you$`y axis`<=25,'a',ifelse(
  you$`y axis`>25&you$`y axis`<=50,'b',ifelse(
    you$`y axis`>50&you$`y axis`<=75,'c','d'
  )
))

p<-ggplot(data=you)+
  geom_point(aes(x=get('x axis'),y=get('y axis'),color=class,shape=class))
p