大神帮帮忙

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

双轴突，次坐标轴不显示变化趋势，不知道原因

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：不显示 坐标轴 不知道

这是ggplot2做的吧，这是两个变量吗，最好把代码发上来，sec.axis参数的用法可能错了，这个参数本身需要对相应的数据进行调整。

llb_321 发表于 2021-8-6 00:23
这是ggplot2做的吧，这是两个变量吗，最好把代码发上来，sec.axis参数的用法可能错了，这个参数本身需要对 ...

Ori.pic<-ggplot(data=Total,aes(x=Year,y=Rate))+geom_line(aes(color=type),size=0.25)+geom_point(aes(color=type,shape=type),size=1)+theme_linedraw()+theme(axis.title=element_text(size=6),axis.text.y=element_text(size=6),axis.text.x=element_text(size=6),legend.position="top",strip.text=element_text(size=6),legend.title=element_blank(),legend.text=element_text(size=6),panel.background=element_blank())+scale_y_continuous(name="高龄比例，%",breaks=seq(10,30,5),sec.axis=sec_axis(~.*1/100,name="变化趋势",breaks=seq(0,0.3,0.06),label=format(seq(0,0.3,0.06),nsmall=1)))+scale_x_continuous(name="年份",breaks=seq(2013,2020),labels=seq(2013,2020),limits=c(2013,2020))

llb_321 发表于 2021-8-6 00:23
这是ggplot2做的吧，这是两个变量吗，最好把代码发上来，sec.axis参数的用法可能错了，这个参数本身需要对 ...

Ori.pic<-ggplot(data=Total,aes(x=Year,y=Rate))+geom_line(aes(color=type),size=0.25)+geom_point(aes(color=type,shape=type),size=1)+theme_linedraw()+theme(axis.title=element_text(size=6),axis.text.y=element_text(size=6),axis.text.x=element_text(size=6),legend.position="top",strip.text=element_text(size=6),legend.title=element_blank(),legend.text=element_text(size=6),panel.background=element_blank())+scale_y_continuous(name="高龄比例，%",breaks=seq(10,30,5),sec.axis=sec_axis(~.*1/100,name="变化趋势",breaks=seq(0,0.3,0.06),label=format(seq(0,0.3,0.06),nsmall=1)))+scale_x_continuous(name="年份",breaks=seq(2013,2020),labels=seq(2013,2020),limits=c(2013,2020))

llb_321 发表于 2021-8-6 00:23
这是ggplot2做的吧，这是两个变量吗，最好把代码发上来，sec.axis参数的用法可能错了，这个参数本身需要对 ...

谢谢，这是代码
Ori.pic<-ggplot(data=Total,aes(x=Year,y=Rate))+geom_line(aes(color=type),size=0.25)+geom_point(aes(color=type,shape=type),size=1)+theme_linedraw()+theme(axis.title=element_text(size=6),axis.text.y=element_text(size=6),axis.text.x=element_text(size=6),legend.position="top",strip.text=element_text(size=6),legend.title=element_blank(),legend.text=element_text(size=6),panel.background=element_blank())+scale_y_continuous(name="高龄比例，%",breaks=seq(10,30,5),sec.axis=sec_axis(~.*1/100,name="变化趋势",breaks=seq(0,0.3,0.06),label=format(seq(0,0.3,0.06),nsmall=1)))+scale_x_continuous(name="年份",breaks=seq(2013,2020),labels=seq(2013,2020),limits=c(2013,2020))

[img][/img]

sec_axis(~.*1/100 这里改一下，比如sec_axis(~.*1