24小时热门版块排行榜    

查看: 1684  |  回复: 7

jinlaiquan

新虫 (初入文坛)

[求助] R语言怎么做下面的图? 已有2人参与

下面是SPEI图,这个图是plot(spei(ts(....函数自动创建的。
R语言怎么做下面的图?

那么R如何做这样的图?
我只能做成下面的样式,正负数怎么赴不同的颜色的?这是面积图还是折线图?
R语言怎么做下面的图?-1


请教各位高手!
我的字段分别是  Date和SPEI
我的代码如下:
data<-read.csv("HAMI.csv"
data$Date<-as.Date(data$Date)
p2<-ggplot(data=data,mapping=aes(x=Date,y=SPEI))
p2+ geom_area(fill="gray",colour="green",stat = "identity",alpha = 1) +theme_bw()+ theme(panel.grid.major=element_line(colour="blue",size=0.5,linetype="dotted")
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jinlaiquan

新虫 (初入文坛)

2楼2016-10-21 14:09:11
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lvchengrui

专家顾问 (正式写手)

【答案】应助回帖

面积图来的。

par(mfcol = c(4,1))
gps
3楼2016-10-24 19:54:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jinlaiquan

新虫 (初入文坛)

引用回帖:
3楼: Originally posted by lvchengrui at 2016-10-24 19:54:14
面积图来的。

par(mfcol = c(4,1))

怎么给不同的颜色?

发自小木虫IOS客户端
4楼2016-10-28 13:17:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

FMStation

至尊木虫 (知名作家)

【答案】应助回帖

http://www.statmethods.net/advgraphs/parameters.html
CODE:
# Set a graphical parameter using par()

par()              # view current settings
opar <- par()      # make a copy of current settings
par(col.lab="red") # red x and y labels
hist(mtcars$mpg)   # create a plot with these new settings
par(opar)          # restore original settings

5楼2016-10-30 10:26:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jinlaiquan

新虫 (初入文坛)

引用回帖:
5楼: Originally posted by FMStation at 2016-10-30 10:26:45
http://www.statmethods.net/advgraphs/parameters.html

# Set a graphical parameter using par()

par()              # view current settings
opar <- par()      # make a copy of current settings
...

怎么改变刻度?

发自小木虫IOS客户端
6楼2016-11-25 21:04:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

FMStation

至尊木虫 (知名作家)

【答案】应助回帖

axis(side, at=, labels=, pos=, lty=, col=, las=, tck=, ...)
http://www.statmethods.net/advgraphs/axes.html
7楼2016-11-25 21:40:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

零三号同学

新虫 (初入文坛)

大神,你做出这些图了吗?求指教。

发自小木虫Android客户端
8楼2017-02-27 23:03:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 jinlaiquan 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[硕博家园] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 qTvzQBRAHjCi 2026-08-07 4/200 2026-08-08 17:19 by oEVWOejN9taj
[基金申请] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 qTvzQBRAHjCi 2026-08-07 5/250 2026-08-08 17:02 by oEVWOejN9taj
[论文投稿] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 qTvzQBRAHjCi 2026-08-07 4/200 2026-08-08 16:47 by oEVWOejN9taj
[博后之家] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 Vi50GxzrFcSG 2026-08-07 4/200 2026-08-08 16:02 by oEVWOejN9taj
[论文投稿] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 WQyTGMbfH7Cx 2026-08-07 4/200 2026-08-08 15:02 by oEVWOejN9taj
[基金申请] fileCode有新解读? +9 Tide man 2026-08-08 17/850 2026-08-08 14:56 by archvillain
[论文投稿] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 HEQlVqMTIA7d 2026-08-07 5/250 2026-08-08 14:22 by oEVWOejN9taj
[基金申请] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +4 KXLV3nuBVBY7 2026-08-07 5/250 2026-08-08 14:07 by oEVWOejN9taj
[论文投稿] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 KXLV3nuBVBY7 2026-08-07 6/300 2026-08-08 14:01 by oEVWOejN9taj
[基金申请] 基金中了 +14 laoda193707 2026-08-06 14/700 2026-08-08 00:23 by 实验小白ha
[基金申请] 关于filecode +4 布布和一二 2026-08-07 7/350 2026-08-07 22:55 by zhanghaozhu
[基金申请] 化学口download_prp&amp;fileCode的固定段好像这几天一直没变,有变的大神么? +3 Tide man 2026-08-07 4/200 2026-08-07 22:39 by Tide man
[基金申请] 听说今天filecode变了 +24 布布和一二 2026-08-06 47/2350 2026-08-07 16:02 by zhiyanjiang
[基金申请] filecode与中标关系的预测 +3 布布和一二 2026-08-07 3/150 2026-08-07 15:09 by gltch
[基金申请] 大家散了吧,后缀研究没有意义,别浪费时间了,过好目前的每一天,不要焦虑 +5 Tide man 2026-08-06 7/350 2026-08-07 13:11 by 医学老男孩
[基金申请] filecode +14 等待解的谜 2026-08-06 19/950 2026-08-07 12:20 by wlwhappy
[基金申请] filecode +8 布布和一二 2026-08-06 11/550 2026-08-06 20:41 by tangpu318
[基金申请] 求各位大神看下 100+6 hpkpkpkp 2026-08-05 33/1650 2026-08-06 14:49 by zhiyanjiang
[基金申请] 影响面上的因素 +8 布布和一二 2026-08-05 11/550 2026-08-06 10:41 by 宝贝虫子
[基金申请] 面上提前没消息,有中的吗 +14 archvillain 2026-08-02 18/900 2026-08-04 14:42 by archvillain
信息提示
请填处理意见