小编rcs*_*rcs的帖子

即使我发现哈德利对谷歌的论坛中发帖POSIXct和geom_vline,我无法完成它.我有一个时间序列,并希望绘制1998年,2005年和2010年的垂直线.我尝试使用ggplot和qplot语法,但我仍然看不到垂直线,或者在第一个垂直网格上绘制垂直线,整个系列在右边有点奇怪地移动.

gg <- ggplot(data=mydata,aes(y=somevalues,x=datefield,color=category)) +
      layer(geom="line")
gg + geom_vline(xintercept=mydata$datefield[120],linetype=4)
# returns just the time series plot I had before, 
# interestingly the legend contains dotted vertical lines

我的日期字段格式为"1993-07-01",属于班级Date.

我有一个包含10列的数据框,收集"用户"的操作,其中一列包含ID(不唯一,标识用户)(第10列).数据帧的长度约为750000行.我试图提取由包含"用户"标识符的列分割的单个数据帧(因此得到数据帧的列表或向量),以隔离单个actor的动作.

ID | Data1 | Data2 | ... | UserID
1  | aaa   | bbb   | ... | u_001
2  | aab   | bb2   | ... | u_001
3  | aac   | bb3   | ... | u_001
4  | aad   | bb4   | ... | u_002

结果

list(
ID | Data1 | Data2 | ... | UserID
1  | aaa   | bbb   | ... | u_001
2  | aab   | bb2   | ... | u_001
3  | aac   | bb3 …

如何合并两个数据框的列,包含一组不同的列,但某些行具有相同的名称？两个数据框中不出现的行的字段应填充零:

> d
    a   b   c   d   e   f   g   h   i  j
1 1.0 2.0 3.0 4.0 5.0 6.0 7.0 8.0 9.0 10
2 0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8 0.9  1
> e
   k  l  m  n  o  p  q  r  s  t
1 11 12 13 14 15 16 17 18 19 20
3 21 22 23 24 25 26 27 28 29 30
> de
    a   b   c   d   e   f   g …

轴值为-6,-4,-2,0,2,4,6,密度图中有一些y值.是否可以使用ggplot在某些x轴值(Forex:-3和+3)上添加虚线垂直线？

library(ggplot2)
df <- data.frame(x = rnorm(1000, 0, 1), y = rnorm(1000,
     0, 2), z = rnorm(1000, 2, 1.5))
df.m <- melt(df)
ggplot(df.m) + geom_freqpoly(aes(x = value,
     y = ..density.., colour = variable))

使用geom_text标记散点图的外围点.根据定义,这些点往往靠近画布边缘:通常至少有一个单词与画布边缘重叠,使其无用.

显然,这可以通过以下情况手动解决+ xlim(c(1.5, 4.5)):

# test
df <- data.frame(word = c("bicycle", "tricycle", "quadricycle"),
                 n.wheels = c(2,3,4),
                 utility = c(10,6,7))
ggplot(data=df, aes(x=n.wheels, y=utility, label=word))  + geom_text() + xlim(c(1.5, 4.5))

但这并不理想

1. 它不是自动化的,因此如果要生成许多图,则会减慢过程
2. 它并不准确,这意味着单词边缘和画布边缘之间的距离在每种情况下都不相等.

搜索这个问题没有找到解决方案,Hadley Wickham似乎满足于在ggplot2的帮助页面中将标签切成两半(我知道Hadley,他们只是一个例子;)

我正在尝试使用图形设备在函数中保存ggplot.但我发现代码生成空图.下面是一个非常简单的例子.

library(ggplot2)
ff <- function(){
  jpeg("a.jpg")
  qplot(1:20, 1:20)
  dev.off()
}
ff()

如果我只运行函数的内容,一切都很好.我知道使用ggsave()会做我想要的事情,但我只是想知道为什么jpeg()加上dev.off()不起作用.我尝试使用不同版本的R,问题仍然存在.

我在Windows上使用gvim,我想知道一种方法来禁用临时文件(以〜结尾)文件创建.如果我们这样做也有问题吗？

有谁知道如何用R计算决策树的错误率？我正在使用该rpart()功能.

为什么

ggplot(data.frame(x=c(1,2),y=c(1,2),z=c(1.5,1.5)),aes(x=x,y=y,color=z)) +
geom_point()

给我错误

grid.Call.graphics中的错误(L_raster,x $ raster,x $ x,x $ y,x $ width,x $ height,:空栅格

但以下两个图表的工作原理

ggplot(data.frame(x=c(1,2),y=c(1,2),z=c(2.5,2.5)),aes(x=x,y=y,color=z)) +
geom_point()
ggplot(data.frame(x=c(1,2),y=c(1,2),z=c(1.5,2.5)),aes(x=x,y=y,color=z)) +
geom_point()

我正在使用ggplot2 0.9.3.1

大约90%的时间,在使用get_map时ggmap,我收到以下错误.有人可以告诉我为什么吗？

map <- get_map(location = 'Australia', zoom = 4)

在download.file错误(!URL,destfile = destfile,安静=短信,模式= "WB"):无法打开URL" http://maps.googleapis.com/maps/api/staticmap?center=Australia&zoom=4&size= %20640x640&scale =%202&maptype = terrain&sensor = false '另外:警告消息:在download.file(url,destfile = destfile,quiet =!messaging,mode ="wb"):无法打开:HTTP状态为'403 Forbidden'