从数据帧到ggplot的坐标

时间:2015-01-30 21:03:32

标签: r ggplot2

我有一个数据框,其中包含我需要绘制的有用数据。 数据框包括一些我想用ggplot自动绘制的坐标,而不是手动输入从结果中收到的坐标。

我似乎记得ggplot函数的一个简单的补充,允许这样做,但我没有想到任何事情。

下面是绘制一些随机数据的示例代码,但突出显示了数据框中的一些有用坐标。

a <- list(1.5, 100, 3.5)
b <- list(1.5, 105, 2.5)
c <- list(1.5, 205, 1.5)
d <- as.data.frame(rbind(a,b,c)) #test dataframe with useful information

time <- seq.int(0,419.5,0.5) #x-axis
set.seed(1) 
pyro <- rnorm(840) 

ggplot(data=d, aes(x=time,y=pyro)) +    
    geom_point(alpha=1/4) +
    geom_point(x=100, y=1.5, color="red", size=5) +
    geom_point(y=1.5, alpha=.10, color="red", size=.25)

我想自动拥有坐标&#34;#34;插入而不是手动查找它们,我尝试使用以下代码执行此操作:

ggplot(data=d, aes(x=time,y=pyro)) +    
    geom_point(alpha=1/4) +
    geom_point(x=d[1,2], y=d[1,1], color="red", size=5) +
    geom_point(y=d[1,1], alpha=.10, color="red", size=.25)

然而,似乎不允许这样做。

非常感谢任何帮助,谢谢。

1 个答案:

答案 0 :(得分:1)

完成以下更改后,您的代码将完美运行:

mt = as.numeric(d[1,2])
mT = as.numeric(d[1,1])

接下来,对代码进行一些修改。

  ggplot(data=d, aes(x=time,y=pyro)) +    
  geom_point(alpha=1/4) +
  geom_point(x=mt, y=mT, color="red", size=5) +
  geom_point(y=mT, alpha=.10, color="red", size=.25)