小编Jul*_*ora的帖子

我在我的网站上的某个地方有一个重写递归错误,谷歌博特造成了,但我找不到导致它的网址,因为我的Loglevel很低.我提出了它,但到目前为止还没有再发生过.

RewriteRule .* - [E=HTTP_AUTHORIZATION:%{HTTP:Authorization}]

所有Rewriterules对我来说都很好,除了这个之外还有[L]标志.

我不太明白.它来自开源商店系统Magento.

据我所知它只会设置环境变量E.但这不是一个非常愚蠢的方式吗？如果这是目标,你不应该使用SetEnv吗？

我有一个数据集,可以在不同的日期对不同的组进行测量.

我希望并排表示不同日期的测量值的并排条形图,其中条形组根据测量日间隔,并且误差栏覆盖在它们上面.

我在躲避geom_bar同意躲闪时遇到了麻烦geom_errorbar.

这是一段简单的代码:

days          = data.frame(day=c(0,1,8,15));
groups        = data.frame(group=c("A","B","C","D", "E"), means=seq(0,1,length=5));


my_data       = merge(days, groups);


my_data$mid   = exp(my_data$means+rnorm(nrow(my_data), sd=0.25));
my_data$sigma = 0.1;


png(file="bar_and_errors_example.png", height=900, width=1200);
plot(ggplot(my_data, aes(x=day, weight=mid, ymin=mid-sigma, ymax=mid+sigma, fill=group)) +
     geom_bar      (position=position_dodge(width=0.5))                                   +
     geom_errorbar (position=position_dodge(width=0.5), colour="black")                   +
     geom_point    (position=position_dodge(width=0.5), aes(y=mid, colour=group)));
dev.off();

在图中,错误显示与其条形图有一个固定的偏移量(抱歉,即使ggplot2是主题,也不允许新手使用图表).

调整binwidth时geom_bar,偏移量不固定,每天都会变化.

请注意,那geom_errorbar并同时geom_point躲闪.我如何geom_bar同意其他两个？

任何帮助赞赏.

在ggplot2中,p <- qplot(wt, mpg, data=mtcars, colour=factor(cyl))从此处获取的以下命令绘制散点图,每个点根据因子着色

我想用geom_smooth来拟合所有数据而不考虑因素,但是根据因子保持各个点的颜色.p + geom_smooth(method="lm")在每个因素上线性拟合.我该怎么做呢？

我试图在一些时间序列的气候数据中检测到异常值,但缺少一些观察结果.在网上搜索我找到了许多可用的方法.其中,从消除趋势和季节性成分以及研究其余部分的意义上来说,stl分解似乎很有吸引力.阅读STL:季节性趋势分解过程基于黄土,stl似乎可以灵活地确定分配变异性的设置,不受异常值的影响,并且可以应用尽管缺失值.但是,尝试将其应用于R,经过四年的观察并根据http://stat.ethz.ch/R-manual/R-patched/library/stats/html/stl.html定义所有参数,我遇到错误:

时间序列包含内部NA

什么时候na.action = na.omit,和

系列不是周期性的或少于两个周期

时na.action = na.exclude.

我仔细检查了频率是否正确定义.我在博客中看到了相关问题,但没有找到任何可以解决此问题的建议.是否无法在缺少值的系列中应用stl？我非常不愿意插入它们,因为我不想引入(并因此检测......)工件.出于同样的原因,我不知道使用ARIMA方法是否可行(如果缺失值仍然存在问题).

如果您知道在缺失值的系列中应用stl的方法,或者如果您认为我的选择在方法上不合理,或者您有任何更好的建议,请分享.我在这个领域很新,并且被大量的(看似......)相关信息所震撼.

我试图为每组绘制2种不同颜色的2条实线,但也在这些线条周围添加相同颜色的虚线,然后添加图例.出于某种原因,我在使用"虚线"或"虚线"时遇到了麻烦,似乎我正在两次绘制虚线.我也没有得到正确的传说,我得到了错误Adding another scale for 'colour', which will replace the existing scale.

你能帮我弄清楚我做错了什么吗？这是一个示例数据集和我尝试过的内容:

x <- c(10, 20, 50, 10, 20, 50)
mean = c(52.4, 98.2, 97.9, 74.1, 98.1, 97.6)
group = c(1, 1, 1, 2,2,2) 
upper = c(13.64, 89, 86.4, 13.64, 89, 86.4)
lower = c(95.4, 99.8, 99.7, 95.4, 99.8, 99.7)
data <- data.frame(x=x,y=mean, group, upper, lower)

ggplot(data, aes(x = x, y= mean, group = as.factor(data$group), colour=as.factor(data$group))) + geom_line() + geom_point() + geom_line(data=data,aes(x=x, y=lower, group = as.factor(data$group), colour=as.factor(data$group), linetype="dotted")) …

我正试图在ggplot2中绘制一个简单的箱形图.我有物种丰富性与土地利用类.但是,我的数据中有2个NA.出于一些奇怪的原因,他们正在被绘制,即使他们被R理解为NA.任何建议要删除它们？

我正在使用的代码是:

ggplot(data, aes(x=luse, y=rich))+
  geom_boxplot(mapping = NULL, data = NULL, stat = "boxplot", position = "dodge", outlier.colour = "red", outlier.shape = 16, outlier.size = 2, notch = F, notchwidth = 0.5)+
  scale_x_discrete("luse", drop=T)+
  geom_smooth(method="loess",aes(group=1))

但是,该图表包含2个NA用于luse.不幸的是我无法发布图片,但想象一下我的图表中添加了一个NA栏.

如果有的话,我认为必须有一个非常简单的解决方案.我有两个大型数据帧,基本上看起来像这样:

> data1[1,]
      chromosome start    end      test ref position log2      p.value 
13600 Y          10199251 10200750 533  616 10200000 0.2181711 0.00175895   
...

> data2[1,]
      chromosome start    end      test ref position log2       p.value 
4080  Y          10197501 10202500 403  367 10200000 0.04113596 0.3149926   
...

我正在使用此代码将两个数据帧绘制到同一个图中:

p <- ggplot() + geom_point(data=subset(data1, p.value >= glim[1]),
map=aes(x=position, y=log2, colour=p.value))
+ geom_point(data=subset(data2, p.value >= glim[1]), map=aes(x=position,
y=log2, colour=p.value))

当我绘制单个数据帧时,我在"p.value"列中使用了红白色渐变.使用此行:

p <- p + scale_colour_gradient(limits=glim, trans='log10', low="red", 
high="white") 

核心问题是:现在有两个数据帧,如何为data1设置一个颜色渐变,为data2设置另一个颜色渐变？我在上一篇文章中读到,不可能使用两种不同的色标(ej."low ="表示第一个,"high ="表示第二个),但在这种情况下是完全相同的色标(如果我没有混淆术语).语法显然不正确,但我想做这样的事情:

p <- p + scale_colour_gradient(limits=glim, trans='log10', low="red", …

如果你定性地映射到大量组的颜色,ggplot的自动颜色分配会相邻地绘制非常相似的颜色,这使得很难看出哪个引用哪个键等.为了说明:

require(ggplot2); require(stringr)
df = data.frame(x = letters, y = sample(20:100,26), lab=word("apple ball cat dog elephant frog goat hat ice jackal king lion mango nest owl parrot queen rabbit ship tomato umbrella van watch xylophone yatch zebra", 1:26))
p = ggplot(df, aes(x, y, fill=lab)) + geom_bar(stat="identity")
p + scale_fill_discrete()

可以手动混合一些随机颜色:

cols = rainbow(26, s=.6, v=.9)[sample(1:26,26)]
p + scale_fill_manual(values=cols)

..导致更有用的彩虹分裂,但这看起来很笨拙,仍然留下一些颜色聚集在一起,一般不理想.ggplot有一个本机方法来实现这样的东西(但希望更好)？

我正在尝试识别未包含在另一个向量中的元素.例如,我有两个向量

list.a <- c("James", "Mary", "Jack", "Sonia", "Michelle", "Vincent")

list.b <- c("James", "Sonia", "Vincent")

有没有办法验证哪些人不重叠？在这个例子中,我想得到包含Mary,Jack和Michelle的向量结果.

任何建议都会有帮助!

我想从x轴移除轴刻度而不从y轴移除它们.

现在,我可以使用以下方法删除它们:

axis.ticks=theme_blank()

例如:

# Generate data
c <- ggplot(mtcars, aes(factor(cyl)))

c + geom_bar()+opts(axis.ticks=theme_blank())
#c + geom_bar(width=.5)
#c + geom_bar() + coord_flip()
#c + geom_bar(fill="white", colour="darkgreen")

但我不知道如何独立控制它们.