小编Eco*_*o06的帖子

我有一个包含位置和日期的数据集.我想计算一年中的周数(00-53),但是使用星期四作为一周的第一天.数据如下所示:

  location <- c(a,b,a,b,a,b)
  date <- c("04-01-2013","26-01-2013","03-02-2013","09-02-2013","20-02-2013","03-03-2013")
  mydf <- data.frame(location, date)
  mydf

我知道有一个strftime函数用于计算一年中的一周,但它只能使用星期一或星期日作为一周的第一天.任何帮助将受到高度赞赏.

我想在R中创建直方图[堆积条形图],数据如下:

Period = c(1,1,2,2,3,3,4,4)                              
Sample = c("A","B","A","B","A","B","A","B")
Value1 = c(3,2,6,7,3,2,1,2)
Value2 = c(1,0,5,2,2,0,2,5)
x <- data.frame(Period,Sample,Value1,Value2)

是否可以在X轴上设置"Period"和"Sample",在"Stacked Bar Plot"中设置值("Value1"和"Value2").所以第一个直方图的高度为4(Value1和Value2分开)感谢您的帮助!最好的祝福.

我的问题是我想用平均值和标准差创建图.

我plotmeans在包中找到了这个函数,gplots现在我想在该图中添加一个趋势线.我尝试这样做,abline但它不起作用.我真的很感激一些帮助.

我的数据如下:

year <- c(2004, 2004, 2004, 2005, 2005, 2005, 2006, 2006, 2006, 2007, 2007, 2007, 2008, 2008, 2008, 2009, 2009, 2009)
value <- c(116,114,115,110,110,109,100,99,102,95,96,95,90,91,94,70,71,73)
df <- data.frame(year, value); head(df)
library(gplots)

plotmeans(value ~ year, data= df, p = 0.99, connect= FALSE)
abline(h=c(100), col= "blue", lty= 2)
abline(lm(value ~ year, data= df))

所以第一个abline工作正常,但lm线不行.

我有非常宽的数据框,想创建许多短数据帧？它看起来像这样:

location = c("A","B","C","D","E","F","G","H")                              
V1a = c(1,5,3,2,1,2,5,6)
V2a = c(3,2,6,7,3,2,1,2)
V3a = c(1,0,5,2,2,0,2,5)
V1b = c(3,2,6,7,3,2,1,2)
V2b = c(1,5,3,2,1,2,5,6)
V3b = c(1,5,3,2,1,2,5,6)
x <- data.frame(location,V1a,V2a,V3a,V1b,V2b,V3b)

x
  location V1a V2a V3a V1b V2b V3b
1        A   1   3   1   3   1   1
2        B   5   2   0   2   5   5
3        C   3   6   5   6   3   3
4        D   2   7   2   7   2   2
5        E   1   3   2   3   1   1
6        F   2   2   0   2   2 …

我试图找到如何遮蔽ggplot中由函数定义的两行之间的区域的可能性.我找到了一些使用geom_area或geom_ribbon的解决方案,但在这两种情况下,您都需要一个数据库,您可以在其中定义ymin和ymax.还有其他可能性吗？在定义ymin和ymax的方式中,也使用与行相同的函数？

这是我的例子:

myplot <- ggplot(data.frame(x=c(0, 100)), aes(x=x)) +
stat_function(fun= function(x)20*sqrt(x), geom="line", colour= "black", size= 1) +
stat_function(fun= function(x)50*sqrt(x), geom="line", colour= "black", size= 1)
myplot

提前谢谢你的帮助.