请选择 进入手机版 | 继续访问电脑版
楼主: 09113866
540 4

R 作图 [推广有奖]

  • 2关注
  • 0粉丝

硕士生

15%

还不是VIP/贵宾

-

威望
0
论坛币
578 个
通用积分
6.5099
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
2297 点
帖子
70
精华
0
在线时间
123 小时
注册时间
2013-9-24
最后登录
2023-7-18

09113866 学生认证  发表于 2018-4-15 10:27:20 |显示全部楼层 |坛友微信交流群
相似文件 换一批

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
请教各位关于R语言作图的一个问题:参看附件,数据样本(1920-1921年日度数据时间并不连续)以及我的作图结果,我想要将横轴标签改为时间,只需要4个标签就可以,但一直没找到合适的解决方式,烦请各位大神帮我看看!谢谢!
二维码

扫码加我 拉你入群

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

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


作图结果.png

数据样本.xlsx

57.96 KB

09113866 学生认证  发表于 2018-4-15 10:29:11 |显示全部楼层 |坛友微信交流群
自己顶一个!

使用道具

pippen303 发表于 2018-4-15 18:08:24 |显示全部楼层 |坛友微信交流群
您好:
关于您的问题,刚好日前撰写一支R程式有使用到,语法请参考下列内容,若有详细内容需求,可连结我的博客网址内容(https://hy-chou.blogspot.tw/2018/ 01/r.html),谢谢。

plot(1:3,4:6,xaxt='n',xlab="time",ylab="data",pch=16,col="blue")#利用xaxt='n'语法使不画出x轴标签,将以时间替代
axis(1,at=seq(1,3,1),label=t)#将x轴标签以时间t替代
已有 1 人评分论坛币 学术水平 热心指数 收起 理由
crystal8832 + 10 + 1 + 1 热心帮助其他会员

总评分: 论坛币 + 10  学术水平 + 1  热心指数 + 1   查看全部评分

使用道具

09113866 学生认证  发表于 2018-4-22 10:33:56 |显示全部楼层 |坛友微信交流群
pippen303 发表于 2018-4-15 18:08
您好:
关于您的问题,刚好日前撰写一支R程式有使用到,语法请参考下列内容,若有详细内容需求,可连结我的 ...
您好:
不好意思才看到信息,时间拖长了导致您发的链接失效了。
此外,我仿照您的代码,得出的结果如附件所示,很奇怪为什么只有第一个时间被显示出来了?
结果.png

使用道具

pippen303 发表于 2018-4-24 23:13:27 |显示全部楼层 |坛友微信交流群
您好:
关于您的原始数据档案,我无法下载,因此自行定义数据,完整程式码和结果图档如下所示,希望能协助您解决问题。
另外,关于博客连结失效问题,建议您用翻墙方式连结,网页状态是正常的。

#定义数据
t<-c("1920/1/26","", "1920/1/28","", "1920/1/30","", "1920/2/1")
y<-c(63,94,77,34,55,26,12)

plot(1:length(t),y,xaxt='n',xlab="time",ylab="data",pch=16,col="blue")#利用xaxt='n'语法使不画出x轴label,将以时间替代
lines(1:length(t),y)#数据连线作图
axis(1,at=seq(1,length(t),1),label=t)#将x轴label以时间替代

使用道具

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注jltj
拉您入交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-4-18 11:17