小编use*_*293的帖子

如何使用ggplot2标记LOESS曲线的斜率变化?

我有一些时间序列数据,我在ggplot2中拟合黄土曲线,如附图所示.数据采用"S"曲线的形状.我真正需要知道的是数据开始趋于平稳的日期,它看起来正好在'550'或'600'时间

是否有某种定量方式可以在图中标出?

指向数据集的链接:http://dl.dropbox.com/u/75403/stover_data.txt

A dput()数据集:

structure(list(date = c(211L, 213L, 215L, 217L, 218L, 221L, 222L, 
223L, 224L, 225L, 226L, 228L, 229L, 230L, 231L, 232L, 233L, 234L, 
235L, 236L, 237L, 238L, 239L, 240L, 241L, 242L, 244L, 246L, 247L, 
248L, 249L, 250L, 251L, 253L, 254L, 255L, 256L, 258L, 259L, 260L, 
261L, 262L, 263L, 264L, 265L, 266L, 267L, 268L, 269L, 270L, 271L, 
272L, 273L, 274L, 275L, 276L, 277L, 278L, 279L, 281L, 282L, 283L, 
285L, 286L, 287L, 288L, 290L, 291L, 292L, …
Run Code Online (Sandbox Code Playgroud)

r loess

9
推荐指数
1
解决办法
3031
查看次数

R:将line()函数添加到条形图并获取匹配的x值

我有barplot()以下代码:

mp<-barplot(data.30.s$mean.rev,names.arg=data.30.s$dma.name, 
            main="Mean", ylab="Mean",las=2, cex.names=.5)
abline(h=mean(data.30.s$mean.rev))
lines(data.30.c$mean.rev,col=34)
Run Code Online (Sandbox Code Playgroud)

data.30.s并且data30.c具有相同的x值并且仅在Y值上不同.我想绘制条形图上的线来进行比较.但是,x类别不匹配.

在这种情况下,我使用相同的数据集来查看这些线是否有效,但正如您所看到的那样,绘制的线x值不匹配.任何想法如何解决这个或做这个ggplot将不胜感激.我的ggplot代码是:

ggplot(data.30.s,aes(dma.name,mean.rev))+geom_bar(stat="identity")
Run Code Online (Sandbox Code Playgroud)

但X轴名称不起作用,是一个乱码.

IMG

r ggplot2

1
推荐指数
1
解决办法
2335
查看次数

R:在ddply中获取子集的长度

所以我有一个包含以下列的数据集:test_group,person_id,gross,purchases.这基本上是一个人员列表,他们花了多少钱,他们购买了多少次,以及他们在哪个群体.

我正在使用以下ddply代码来获取一些摘要统计信息:

mean_rpu <- ddply(data, .(test_group), summarise, total_rpu=sum(gross),
    total_users=length(person_id), total_purchasers=length(subset(data,  
    purchases > 0)$person_id), mean_rpu=mean(gross), sd_rpu=sd(gross))
Run Code Online (Sandbox Code Playgroud)

我遇到的问题是"total_purchasers"摘要.我正在尝试计算每个test_group中购买者的数量.当前代码仅显示整个数据集中的total_purchasers,而不是test_group因子的repsective.我可以用这个优化吗?

我很感激帮助!

r

1
推荐指数
1
解决办法
3071
查看次数

标签 统计

r ×3

ggplot2 ×1

loess ×1